IBM 5110 

Customer Support Functions 
Reference Manual 




SA21 9311 1 


Customer Support Functions Reference Manual 





Preface 
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the APL or BASIC language. 

The users should read Chapter 1 for general information 
about the customer support functions. After becoming 
familiar with Chapter 1, they need only read the chapter 
that describes the function they want to use. 

Note: This major revision does not apply to machines using 
a diskette sort IMF or the loadable diskette sort. If your 
machine requires a diskette sort IMF or the loadable diskette 
sort, use the previous documentation supplied with the 
machine. 
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Chapter 1. Introduction 


The functions described in this manual, except for sort, are supplied by IBM on 
a tape cartridge or diskette. The Diskette Sort feature is a hardware option and 
can be ordered as a feature. The following is a list of the functions, the file 
names, and the associated tape and diskette file numbers. 


File Number 

File Name 

Description 

1 

LOADER 

Loader 

2 

INITIAL 

Diskette initialization 

3 

DDCOPY 

Diskette-to-diskette copy 

4 

TDTCOPY 

Tape-to-diskette copy 

4 

TDTCOPY 

Diskette-to-tape copy 

5 

TTCOPY 

Tape-to-tape copy 

6 

COMPRESS 

Diskette compress 

7 

LDISPLAY 

Label display 

8 

DRECOVER 

Diskette recovery 

9 

TRECOVER 

Tape data recovery 

10 

HRECOVER 

Tape header recovery 

11 

IMF 

IMF file 

12 

IMAGCOPY 

Image copy 


You can use one of the copy functions to copy the customer support functions 
from the IBM-supplied tape cartridge or diskette to one of your own. You can 
use any file number you want when you copy the customer support functions. 
The file numbers given in this manual refer to the IBM-supplied tape cartridge 
or diskette. 


OVERVIEW 


Diskette Initialization 

The diskette initialization function formats a diskette. The number of bytes in a 
sector and the number of sectors in a track determine the format. A diskette 
must be formatted before it can be used. You may also use the diskette 
initialization function to change the format of a diskette. Changing the format 
can increase the capacity of a diskette and sometimes can improve the 
performance of programs that use a diskette file. Any data on a diskette is 
destroyed by the diskette initialization function. 
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Copy Functions 


Four different copy functions are available. They provide for all possible 
combinations of copying between tapes and diskettes. 



The copy functions enable you to make another copy of a file for security 
reasons or to use in testing a program. You should maintain an extra copy 
(backup) of all your important files. These copies would help you retain the 
data in the files should the original files be accidentally lost or destroyed. To 
test your programs, you should use a copy of the file and not the original file. 
In this way, if the program should fail, you would not have to recreate or 
correct your original file. 


Recovery Functions 

The recovery functions allow you to correct most read errors on tape and 
diskette data files, tape and diskette header labels and diskette volume labels. 


Label Display 

The label display function displays and prints the diskette and tape labels. This 
printout is useful when a read error occurs on the label portion of a file. It is a 
good idea to get a printout of labels on all your files occasionally so that you 
have a record of the contents of each diskette or tape. 










Diskette Compress 


The diskette compress function moves all files on the diskette as close to 
cylinder 0 as possible. When you free files and then mark new files on a 
diskette, space can be left between files. For example, you could free a 20K 
file in the middle of your diskette and then mark a 16K file. The 4K of space 
would not be used unless you marked a 4K file. The diskette compress 
function moves all the available space to the end of the diskette. 


Loader 

The loader function is used to load certain feature programs, such as the Serial 
I/O Adapter feature, into the system. The loader function is also used to 
maintain the language part of your system. Internal machine fixes (IMFs) are 
supplied by IBM to correct known problems and can be loaded into the 
machine with the loader. 


Diskette Sort 

The Diskette Sort feature of the IBM 5110 allows you to sort diskette record 
I/O files. This feature can be used to change the order of the records in a file 
so that a special report can be easily generated. The sort may also be used to 
put the input records for a program in order so that processing time is 
reduced. The Diskette Sort feature produces two types of output: standard (in 
which the records are sorted and written on the output file) and address out (in 
which the relative record number (addresses) of the sorted records are written 
on the output file). 


OPERATION 

The customer support functions on the tape or diskette are loaded into the 
machine with the link command. The syntax of the link command for APL is 
)LINK (device file number) [file name] and for BASIC it is LINK (file number), 
['file name',] (device). After a function is loaded, it is automatically executed. 

The Diskette Sort feature is resident (if the feature is installed) within the 
machine and is executed when a )SORT (for APL) or UTIL SORT (for BASIC) 
command is executed. For BASIC, the system device is changed to the default 
value by all the functions except sort. The Diskette Sort feature does not 
change the system device when it is executed from a procedure file. 

When the customer support functions are loaded, the ATTN key does not 
function the same as it does in the language mode. The ATTN key still clears 
the input line, but it will not stop the function when it is executing. 

Display messages are provided to assist you in using the functions. Each time 
a message is displayed you must enter some information or just press the 
EXECUTE key to have the function continue. Anytime a function (except for 
sort) is waiting for you to respond to a message, you can enter a * (asterisk) 
to allow you to restart or terminate the function. The * must be entered in 
position 1 of the input line. For sort you can enter STOP in positions 1 
through 4 of the input line to end the sort. 
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All customer support functions use the system's read/write storage (workspace 
for APL or workarea for BASIC). Therefore, any data you have In the 
machine should be saved before a function is used. Since IMFs and feature 
programs also use part of the system's read/write storage, at times there may 
not be enough room to load the customer support functions with the IMFs and 
feature programs loaded. 

Several of the functions use keyword statements followed by parameters. The 
parameters must be entered in the order shown. Each parameter must be 
separated from the next by a comma. When a parameter is omitted, the 
comma must still be entered. For example: 

Parameter 1 , Parameter 2 , Parameter 3 
or 

Parameter 1 , , Parameter 3 (when Parameter 2 is omitted) 


When tape or diskette files are used, the file number must be specified. The 
file name need not be used. If a file name is specified for a diskette input file, 
the system checks to make sure the file name agrees with the file number on 
the diskette. 


The customer support functions use a one-digit entry to indicate the tape and 
diskette drive. The entry used by the customer support functions and the 
equivalent APL or BASIC entry are: 


Utility 

Entry 

1 

2 

1 

2 

3 


APL 

Entry 

BASIC 

Entry 

Physical Device 

1 

E80 

Built-in tape 

2 

E40 

Auxiliary tape 

11 

D80 

Left drive, first unit 

12 

D40 

Right drive, first unit 

13 

D20 

Left drive, second unit 

14 

DIO 

Right drive, second unit 
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FILE NAMES 


Certain rules must be followed when file names are used. The rules depend on 
the type of file, whether it is on tape or diskette, and the language that will 
use the file. 

The term nondata as used in the following chart means that the files contain 
programs (an APL save file, for example). A simple name, as used in the chart, 
consists of up to 8 alphameric characters. The first character of the name 
must be uppercase alphabetic (A-Z). The other characters of the name may be 
alphameric (A-Z, 0-9). For example, DATA, HISTORY, and WEEK21 are all 
simple names. A complex name, as used in the chart, consists of two or more 
simple names separated by a period. Up to 17 characters, including periods, 
are allowed in a complex name. For example, PAYROLL.DATA, 

WEEK21.DATA, and DATA.TEST.R21.A are all complex names. 


Rules for File Names 

Diskette Files 


APL (nondata) 

Simple name. 

APL (data) 

Simple or complex name. 

APL (basic exchange) 

Simple name. 

BASIC 

Simple or complex name. 

BASIC (basic exchange) 

Simple name. 

Tape Files 


APL (nondata) 

Up to 11 characters. Valid characters are 
alphameric (A-Z, 0-9) and underscored 
alphabetics. The first character cannot be 
numeric (0-9). 

APL (data) 

Up to 17 characters. All characters except the 
right parenthesis are valid. 

BASIC 

Up to 17 characters. All characters are valid. 

Each of the remaining chapters in this manual describes a customer support 
function. You need to read only the chapter that covers the function you want 
to use. The error codes are shown in Appendix C. 
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Chapter 2. Loader 


The loader function is used to load feature programs and to maintain the 
language part of your system. The internal machine fixes (IMFs) supplied by 
IBM to correct a problem are loaded into the system with the loader. You 
must load IMFs before you load any feature programs. 


OPERATION 

The loader function is loaded via the link command and is on file 1 on the 
IBM-supplied tape cartridge or diskette. The file name is LOADER. After the 
function is loaded, the following is displayed: 

LOADER FUNCTION 

OPTIONS: 

1, LOAD FROM TAPE 

2. LOAD FROM DISKETTE 

ENTER OPTION NUMBER AND PRESS EXECUTE 


Enter a 1 if you are loading from tape, or a 2 if you are loading from a 
diskette. After the EXECUTE key is pressed, the following is displayed if you 
are loading from tape: 

ENTER TAPE DRIVE NUMBER AND PRESS EXECUTE 


ENTER FILE NUMBER AND PRESS EXECUTE 


Or if you are loading from diskette the following is displayed: 

ENTER DISKETTE DRIVE NUMBER AND PRESS EXECUTE 


ENTER FILE NAME OR NUMBER AND PRESS EXECUTE 


Enter the drive number (1 or 2 for tape; 1, 2, 3, or 4 for diskette) you will be 
dsing, then press the EXECUTE key. 
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To load the feature program from tape, enter the file number of the tape file. 
To load the feature program from diskette, enter either the file number or the 
file name of the diskette file. The feature program is loaded when the 
EXECUTE key is pressed. After the program is loaded, the following is 
displayed: 


feature name L 0 AD ED 

OPTIONS: 

1. RESTART FUNCTION 

2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 


The procedure to load an IMF is similar to loading a feature program. When 
the loader function determines that the tape or diskette file contains an IMF 
and not a feature program, a special message is displayed. How to use the 
loader after this message is displayed is explained in IBM 5110 Language 
Support Maintenance Information Manual, SY31-0581. 



Chapter 3. Diskette Initialization 


The diskette initialization function is used to initialize a diskette. The following 

are some reasons you may want to use this function: 

• The diskette was exposed to a strong magnetic field, and the data can no 
longer be read. 

• A defect has occurred in one or two cylinders, and you want to assign one 
or two of the spare cylinders to replace the defective cylinders. 

• You want to change the format of the diskette (number of sectors per track 
and bytes per sector) to change the diskette capacity. 

• You want to increase the area of a Diskette 2D type of diskette used for 
data set labels. 

Diskette initialization does the following: 

• Creates and writes the ERMAP label. This label is used to record the 
location of any defective cylinders. Up to two defective cylinders are 
allowed on each diskette. If more than two cylinders are defective, the 
diskette should not be used. 

• Creates and writes a volume label on the diskette. 

• Sets aside space for the data set labels- 

• Allocates a file (file 1). 

• Writes the ID field for each sector. 

• Writes data and then reads it back on all tracks. This is done to locate any 
defective areas on the diskette. When a defective area is found, one of the 
spare cylinders is automatically assigned to replace the defective one. 

• Writes the volume identifier and owner identifier on the diskette. 
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OPERATION 


Diskette initialization is loaded via the link command and is on file 2 on the 
IBM-supplied tape cartridge or diskette. The file name is INITIAL After the 
function is loaded, the following is displayed: 


DISKETTE INITIALIZATION FUNCTION, 

OPTIONS: 

1 . D E S C RIP T10 N 0 F F U N C T10 N , 

2. RETURN TO SYSTEM. 

3. ENTER INITIALIZATION COMMAND. 

ENTER OPTION NUMBER IN POSITION ONE AND PRESS EXECUTE TO 
CONTINUE. 


When a 3 is entered, the following is displayed: 


INIT V 0 L ID , 0 W N E R •••• ID , F 0 R M A T , S E G U E N C E N U M B E R 


ENTER APPROPRIATE INITIALIZATION COMMAND AND PRESS EXECUTE. 
IN IT ... 


An entry of 1 provides 3 displays that define the operation of the function. 

The following is displayed when a 1 is entered: 

DIS K E T T E INITIA LIZ A T10 N F U N 0 T10 N . 

DISKETTE INITIALIZATION REFORMATS THE DISKETTE. ALL DATA AND 
PROGRAM FILES WILL BE ERASED. THEREFORE, BEFORE INITIATING THE 
DISKETTE INITIALIZATION FUNCTION, ENSURE THERE IS NO DATA IN ANY 
FILE ON THIS DISKETTE THAT WILL EVER BE USED AGAIN. 









After the EXECUTE key is pressed, the first of three displays explaining the 
initialization command appears. Press the EXECUTE key after the first two 
displays. Enter the required parameters before pressing the EXECUTE key for 
the third display. The three displays are: 

INIT COMMAND HAS THIS FORMAT: 

INIT VOL-ID,OWNER-IDiFORMAT,SEQUENCE NUMBER 

VOL “-ID CAN BE UP TO SIX ALPHAMERIC CHARACTERS, ENTER COMMA IF 

DEFAULT VALUE <VOLID) IS DESIRED, 

OWNER-ID CAN BE UP TO 14- ALPHAMERIC CHARACTERS, ENTER COMMA II 

DEFAULT VALUE (OWNERID) IS DESIRED. 


PRESS EXECUTE TO CONTINUE, 


Press the EXECUTE key to get the second display. 

FORMAT IS 1, 2; 3.. 4, 5, 6, 7, 8 OR 9: 


1 , 2, AND 3 EQUAL- 
RES FESTIVELY FOR l 

DISKETTE SECTOR 
DISKETTE I, 

SIZES 128, 

256, 

AND 512, 

i-i-, 5, AND 6 EQUAL 
RESPECTIVELY FOR 1 

DISKETTE SECTOR 
DISKETTE 2, 

SIZES 128, 

25 6 , 

AND 512, 

7# 8 , AND 9 EQUAL 

DISKETTE SECTOR 

SIZES 256, 

w X /... ) 

AND 102M-, 


RESPECTIVELY FOR DISKETTE 2D, 

FORMATS 1, M-, AND 7 ARE EXCHANGE FORMATS, 
P R E S S E X E C U T E T 0 C 0 N TIN U E , 
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Press the EXECUTE key to get the third display. 

sequence: number is optional, default is sequential sector 

SEQUENCE. THIS FIELD IS A TWO DIGIT FIELD THAT CAN BE USED TO 
SPECIFY A SECTOR SEQUENCE INCREMENT THAT RESULTS IN A 
NONSEQUENTIAL SECTOR SEQUENCE ON THE DISKETTE. 


INIT VQ.L-ID, OWNER-ID, FORMAT, SEQUENCE NUMBER 


ENTER APPROPRIATE INITIALIZATION COMMAND AND PRESS EXECUTE. 
INIT ... 


Enter the parameters for the INIT command, then press the EXECUTE key. 

The INIT Command 

The INIT (initialization) command specifies the volume identification, owner 
identification, format, and sector sequence. 

Syntax 

INIT [vol-id],[owner-id],format[,sequence-number] 


where: 


INIT 

is the command and must be in positions 1 
through 4. 

vol-id. 

(optional) is the volume identifier field. A 
maximum of 6 alphameric characters is allowed 
in this field. If this field is left blank and only the 
comma is entered, the default name of VOLID is 
used as the volume identifier. 

owner-id. 

(optional) is the owner identifier field. A 
maximum of 14 alphameric characters is allowed 
in this field. If this field is left blank and only the 
comma is ent^rdd, the default name of 

OWNERID is used as the owner identifier. 

format. 

specifies the format for the diskette. The valid 
entries are 1 through 9. See Diskette Format, 
which follows, for more information on the 
formats. 



sequence-number (optional) specifies a sector numbering sequence 

other than sequential. The number in this field is 
used as a fixed value when the sector numbers 
are incremented on the diskette. See Diskette 
Format for more information on sector sequence. 
If this field is left blank, the default value of 01 
(sequential sector numbering) is assumed. 

The following are examples of the IN IT command. 

- Command Keyword 

-- Volume Identifier 

-- Owner Identifier 

- Format Number 

|— Entry for Sector Sequence 

:i: n :i: t m a s t e r , m a c c a r t h y , 0,01 
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Command Keyword 

No Volume Identifier (used default of VOLID) 

No Owner Identifier (used default of OWNERID) 
Format Number 

No Sector Sequence Entry (used default-sequential) 


When format 7, 8, or 9 is specified for the I NIT command, the following is 
displayed: 


ADDITIONAL FILE LABELS CAN BE PLACED ON THIS DISKETTE. THE 
NUMBER OF FILE LABELS CAN BE FROM 71 TO 1007. ENTER ONE OF THE 
FOLLOWING AT POSITION ONE AND PRESS EXECUTE. 


OPTIONS: 

BLANK ALLOTS 71 FILES 

1 ALLOTS 175 FILES 

2 ALLOTS 279 FILES 

3 ALLOTS 303 FILES 


M- ALLOTS M-87 FILES 

5 ALLOTS 591 FILES 

6 ALLOTS 695 FILES 


7 ALLOTS 799 FILES 

8 ALLOTS 903 FILES 

9 ALLOTS 1007 FILES 
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Additional space for file labels may now be specified. The valid entries are 
blank and digits 1 through 9. The number of labels and the diskette space 
used by each entry follows. 


Entry 

Number of 

Labels 

blank 

71 

1 

175 

2 

279 

3 

383 

4 

487 

5 

591 

6 

695 

7 

799 

8 

903 

9 

1007 


Cylinders Number(s) Used 

0 

0 and 1 
0 through 2 
0 through 3 
0 through 4 
0 through 5 
0 through 6 
0 through 7 
0 through 8 
0 through 9 


After the EXECUTE key is pressed, the following is displayed: 


INSERT DISKETTE TO BE INITIALIZED IN DESIRED DRIVE, ENTER ONE 
DIGIT DRIVE NUMBER TO BE USED IN THE FIRST POSITION AND 
P R E S S E X E 0 U T E T 0 C 0 N TIN U E . 


Insert the diskette to be initialized in a drive. Enter the one-digit diskette drive 
number (1, 2, 3, or 4) for that diskette drive. Then press the EXECUTE key. 
After initialization is complete, and if no defective cylinders were found, the 
following is displayed: 

D I S !< E T T E IN I T I A L I Z A "f 10 N C 0 H P I... E T E , 


T H E R E A R E N 0 D E F E C TIV E C Y I... IN D E R S 0 N T H I. S DIS l< E T T E 


P R E S S E X E C U T E T 0 C 0 N TIN U E 
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If defective cylinders were found, the following is displayed: 


DISKET TE INITIALIZ AT10N C0 H PLETE. 

T H E F 0 L L 0 WIN G C Y L IN D E R S A R E D E F E C T IV E : 
XX 


PRESS EXECUTE TO CONTINUE. 


The cylinder number, indicated by XX, of any defective cylinder is displayed. 
These numbers are recorded in the ERMAP label located at cylinder 0 sector 5. 
Up to two defective cylinders are allowed on each diskette. The diskette must 
be replaced if more than two cylinders are defective. The diskette must also 
be replaced if cylinder 0 is defective. Cylinder 0 is used by the system to 
record information about the diskette. 


Hints 

• Alphameric characters must be used for the volume and owner identifier 
fields. A maximum of 6 characters can be used for the volume identifier 
and 14 characters for the owner identifier. 

• Error codes are displayed if any of the following conditions are found when 
the function is checking the header label: 

• Secure data set 

• Write-protected data set 

• Data set containing data 

• Nonblank expiration date field 

Once one of these conditions is encountered, the error code is displayed and 

the option can be selected. If you elect to continue, no further checking of the 

labels is performed. 

• Initialization can terminate unsuccessfully if an I/O error is encountered, if 
more than two defective cylinders were encountered, if cylinder 0 is 
defective, or if any extended label cylinder is defective. 
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DISKETTE FORMAT 


Nine different diskette formats are available. The following chart shows the 
number of tracks per cylinder, sectors per track, bytes per sector, and the valid 
entries for the sequence-number field of the INIT command. 


Diskette 

Type 

Format 

Tracks per 
Cylinder 

Sectors 
per Track 

Bytes per 
Sector 

Capacity 
Tracks 1-74 

Valid Sector 
Sequence Number 


1* 

1 

26 

128 

246,272 

01-13 

1 

2* 

1 

15 

256 

284,160 

01-08 


3** 

1 

8 

512 

303.104 

01-04 


4* 

2 

26 

128 

492,544 

01-13 

2 

5* 

2 

15 

256 

568,320 

01-08 


6** 

2 

8 

512 

606,208 

01-04 

or 

7* 

2 

26 

256 

985,088 

01-13 

2D 

8 

2 

15 

512 

1,136,640 

01-08 


9*** 

2 

8 

1024 

1,212,416 

01-04 


* Exchange format (see Diskette Exchange Fites) 
** Maximum capacity 
*** Can only be used for data files 


Diskettes obtained from IBM have a colored label that shows the diskette type. 
The color of the label indicates the sector size used when IBM initialized the 
diskette. 

Label Color Sector Size 


White with black print 128 

Red with white print 256 

Blue with white print 512 

Yellow with black print 1024 


Format 1, 2, or 3 can be used only with a Diskette 1 type of diskette. Formats 
4 through 9 can be used with a Diskette 2 or Diskette 2D type of diskette. 
Diskette 1 diskettes are designed for single-side recording; Diskette 2 and 
Diskette 2D diskettes use both sides for recording. The higher the format 
number, the more data that can be recorded on the diskette. 




The sector sequence number column contains the valid entries for the 
sequence-number field of the INIT command. This field modifies the normal 
sequence numbering of the sectors on the diskette. For example, assume 
format 1 and a sector sequence number of 02. The sectors would be 
numbered as follows: 1, 3, 5, . . . . 23, 25, 2, 4, ... . 24, 26. For a format 1 
and sector sequence number of 13, the sectors are alternately numbered as 
follows: 1, 14, 2, 15, . ... 12, 25, 13, 26. This may enable you to read sector 
1, process the data, and get ready to read sector 2 before the diskette rotates 
past sector 2. If the sectors were numbered sequentially, this type of 
processing would not be possible. 

You can reduce the time required to search a key file by changing the sector 
numbering sequence. If you have a key larger than 20 characters, the internal 
processing to compare the key could take long enough to prevent the reading 
of the next sector. To provide sufficient time to compare the key and get 
ready to read the next sector, alternately number the sectors on the diskette. 

To alternately number the sectors, specify the largest possible sector sequence 
number. For format 1, 4, or 7 specify 13; for format 2, 5, or 8 specify 08; and 
for format 3, 6, or 9 specify 04. Other files on the diskette may process 
slower as a result of the sector numbering being changed. 

Additional File Labels 

A file label is required for each file you have on the diskette. Normally, cylinder 
0 starting at sector 8 is used for labels. A Diskette 1 type of diskette (formats 
1,2, and 3) has room for 19 labels. A Diskette 2 type of diskette (formats 4, 

5, and 6) has room for 45 labels. A Diskette 2D type of diskette (formats 7, 8, 
and 9) has room for 71 labels on cylinder 0. 

Additional cylinders may be used for labels with format 7, 8, or 9. Each 
additional cylinder provides room for 104 additional labels. You should 
consider providing additional space for labels if you plan to use many small 
files on the diskette. A cylinder assigned for additional labels cannot be used 
for data. Therefore, assigning additional cylinders for labels reduces the 
number of cylinders that can be used for data and thus reduces the capacity of 
the diskette. Also, with an extended label area, some diskette operations such 
as mark can take longer. 
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Diskette Exchange Files 


Diskette exchange files can be read and created with the 5110. Format 1, 4, or 
7 diskettes must be used for exchanges files. Formats 1 and 4 are used for 
basic exchange files, and normally format 7 for H-type interchange files. Basic 
exchange files use 128-byte sectors. H-type exchange files use 256-byte 
sectors. The exchange files: 

• Must have a simple name 

• Must have unblocked, unspanned record format (record length must not 
exceed the sector size) 

• Must use a sequential access method 

• For format 1 diskettes, must use sequential sector numbering and have the 
file between cylinders 1 and 73 

• For formats 4 and 7, need not use sequential sector sequence numbering 
and can use cylinders 1 through 74 

• For format 7, must have a file number from 1 to 71 (data set label must not 
be in the extended label area) 




Page of SA21-9311-1 
Issued 26 January 1979 
By TNL: SN21-0297 

Chapter 4. Diskette-to-Diskette Copy and Image Copy 


The diskette-to-diskette copy function copies an entire input diskette to an 
output diskette, copies a group of files from an input file to an output file, or 
copies a selected single input file to an odtput file. When the entire diskette is 
copied, the output diskette will be automatically compressed. When a single 
file is copied, you must mark the output file before the copy operation is 
started. When an entire diskette or a group of files from a diskette is copied, 
the format number of the output diskette must be the same as or larger than 
the format number of the input diskette, and the sector size of both diskettes 
must be the same. The format number represents the capacity (density) of the 
diskette. The higher the number the greater the capacity. 

Your image copy function copies an entire input (copied from) diskette to an 
output (copied to) diskette without compressing space that may have been left 
between files. This function provides an exact copy of your input diskette for 
backup files and testing purposes. When more than 25 files are copied, image 
copy will be faster than diskette-to-diskette copy. 

OPERATION OF DISKETTE-TO-DISKETTE COPY 

The diskette-to-diskette copy function is loaded via the link command and is 
on file 3 on the IBM-supplied cartridge or diskette. The file name is DDCOPY. 
After the function is loaded, the following is displayed: 

DIS K E "f T E I 0 DI S l< E1" T E C 0 P Y F U N C "f0 N 

OPTIONS ARE: 

1, COPY ONE FILE 

2. COPY ALL FILES 

3 , C 0 P Y A G R 0 U P 0 F FIL E S 

S E L E 0 "f 0 P "I" :i: 0 N , P R e s s e x e c u t e 

Enter a 2 to copy the entire input diskette to the output diskette. Enter a 3 to 
copy a group of files from the input diskette to the output diskette. Enter a 1 
to copy a single input file to an output file. To select the number of drives you 
are going to use, the following is displayed: 

H 0 W M A N Y DIS K E "I T E D RIV E S WIL L Y 0 U B E U SIN G 

OPTIONS ARE: 

1. ONE DISKETTE DRIVE 

2. TWO DISKETTE DRIVES 

S E L E C T 0 P T10 N , P R E S S E X E C U T E 


Enter a 1 or 2 to select the number of the diskette drives. 


Diskette-to-Diskette Copy 19 



One-Diskette-Drive Copy 


If you select the one-diskette-drive option, the following is displayed: 

i n s e r t n :i: 8 1 < e r t & b e ;i: n g c o p j: e d f r g m 

I N T O 8 E L E CIE D D18 !< E T T E D RIV E 
E N "(' E R D RIV E N U M B E R , P R E S S E X E C U T E 


Enter a 1, 2, 3, or 4 to select the diskette drive you will be using., Then insert 
the diskette used for input into that drive and press the EXECUTE key. 

The following is then displayed if you are copying a single file: 

E M T E R FIL E N U M B E R T 0 B E C 0 PIE D I" R 0 M 


E N i" E R F J! L E N U M B E R 10 B E C 0 P X E D T 0 


Enter the file number you want to use. The file number can have up to four 
numeric digits. 

If you are copying a group of files, the following is displayed: 

ENTER STARTING FILE NUMBER TO BE COPIED FROM 


E N T E R E N DIN G FIL E N U M B E R T 0 B E C 0P IE D R 0 M 


ENTER STARTING FILE NUMBER TO BE COPIED TO 


Enter the file number you want to use. The file number can have up to four 
numeric digits. The output file will be marked by the copy function. 





When the copy operation is completed, the following is displayed: 

DIS K E T T E C 0 P Y C 0 M P L E T E D 
OPTIONS ARE: 

1 . R E 8 T A R T C 0 P Y F U N C T10 N 

2 . R E T U R N T 0 T H E S Y S T E M 

E N T E R 0 P T10 N.. P R E S S E X E C U T E 


Hints 


• When an entire diskette or a group of files is copied: 

- The sector size of the input and output diskettes must be the same. 

- The format number of the output diskette must be the same or larger 
than the input diskette. 

- The label area on the output diskette must be the same size or larger 
than the input diskette. 

- The ending file number to be copied from must be equal to or greater 
than the starting file number to be copied from. 

• When copying a single file, make sure the output file: 

- Is marked 

- Does not contain valuable data 

- Is large enough to contain all the data on the input file 

- Is not write- or date-protected 

• When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

• When entering a file name for the output file, make sure the name conforms 
to the rules for simple or complex names. 

• When an entire diskette is copied, the contents of the input diskette may 
not fit on the output diskette if the input diskette files were created on a 
different system. The 5110 allocates files in increments of IK (1024 bytes); 
other systems may allocate files differently. For example, assume that the 
input diskette had a sector size of 128 bytes per sector, with a file 
containing only one sector. When this file is copied, the copy function will 
mark a IK output file. This IK file contains eight 128-byte sectors; the first 
sector contains data, and the last seven are empty. If the input diskette is 
full or nearly full, and has several files in which the preceding conditions 
exist, the output diskette may be filled before all files are copied from the 
input diskette. 

• When an entire diskette is copied, all files on the output diskette are freed 
prior to the copy procedure. Make sure the output file does not contain 
important data. 
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OPERATION OF IMAGE COPY 


The image copy function is loaded via the link command and is on file 12 on 
the IBM-supplied cartridge or diskette. The file name is IMAGCOPY. After the 
function is loaded, the following is displayed: 


IMAGE COPY FUNCTION 

HOW MANY DISKETTE DRIVES WILL YOU BE USING 

OPTIONS ARE: 

I.ONE DISKETTE DRIVE 
2 . T W 0 DIS K E T T E D RIV E S 

E N T E R 0 P T10 N N On B E R A N D P R E S S E X E 0 U T E 


Enter a 1 or a 2 to select the number of diskette drives. 


One-Diskette-Drive Copy 

If you select the one-diskette-drive option, the following is displayed: 

INSERT DISKETTE BEING COPIED FROM 

INTO SELECTED DISKETTE DRIVE 

ENTER DRIVE NUMBER AND PRESS EXECUTE 


Enter a 1, 2, 3, or 4 to select the diskette drive you will be using. Then insert 
the diskette used for input into that drive and press the EXECUTE key. 

When files containing data to be copied are found on the input diskette, data 
is read into the system's read/write storage. When the read/write storage is 
filled, the following is displayed: 


INSERT DISKETTE BEING COPIED TO 
PRESS EXECUTE 


You should now remove the diskette used for input from the drive. Then insert 
the diskette to be used for output and press the EXECUTE key. 





The data in read/write storage is then written to the output diskette, and the 
following is displayed: 

INSERT DISKETTE BEING COPIED FROM 
PRESS EXECUTE TO CONTINUE 


You should now remove the output diskette from the diskette drive and insert 
the input diskette. 

This procedure (reading, changing diskettes, writing, changing diskettes again) 
continues until all data is copied. When the copy operation is completed, the 
following is displayed: 

IMAGE COPY COMPLETE 

OPTIONS ARE: 

:l. . RESTART FUNCTION 
2,RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 


If the diskette type, record length or label extension fields differ between the 
input diskette and the output diskette, the following is displayed: 

INPUT OUTPUT 

R E 0 0 R D I.., E N G T H X X X X X X 

DISKETTE TYPE XX XX 

EXTENDED LABELS X X 

OPTIONS ARE: 

1. RESTART FUNCTION 

2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 
COPY ERROR '•!•:!.5 


You must now initialize the output diskette to the same format as the input 
diskette, or select another diskette for output that has the same format as the 
input diskette. 
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If there are marked files on the output diskette, the following is displayed: 


DISKETTE BEING COPIED ONTO ALREADY MARKED 

OPTIONS ARE: 

:!. , RESTART FUNCTION 
2.RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 


You must now delete all marked files on the output diskette, or select another 
diskette for output that has the same format as the input diskette and contains 
no marked files. 

If an error occurs while data is being copied onto the diskette, the function 
attempts to mark the file in which the error occurred as unused. If the file 
cannot be marked as unused, the following is displayed: 


COPY TERMINATED BECAUSE OF I/O ERROR 

FILE XXXX IS INVALID ON OUTPUT DISKETTE 

OPTIONS ARE: 

:l. . RESTART FUNCTION 
2,RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 
DISKETTE ERROR XX ON DRIVE X 

During read/write header execution, the image copy will allow 10 files to be in 
error. If 10 files or less are in error, the file numbers in error are displayed 
within the COPY COMPLETE message: 

IMAGE COPY COMPLETE 

HEADERS FOR FILES LISTED ARE INVALID 

XXXX XXXX XXXX XXXX. XXXX XXXX XXXX XXXX XXXX XXXX XXXX 
OPTIONS ARE: 

1. RESTART FUNCTION 

2, RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 




If more than 10 files are in error when the headers are being copied onto the 
diskette, the following is displayed: 


COPY TERMIHATED BECAUSE OF I/O ERROR 

THE HEADERS FOR THE LISTED FILES ARE INVALID 

XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX 

ON THE OUTPUT DISKETTE 


OPTIONS ARE: 


1. RESTART FUNCTION 

2, RETURN TO SYSTEM 


ENTER OPTION NUMBER AND PRESS EXECUTE 
DISKETTE ERROR XX ON DRIVE X 


Two-Diskette-Drive Copy 

If you selected the two-diskette-drive option, the following is displayed: 

INSERT DISKETTE BEING COPIED FROM 
INTO SELECTED DISKETTE DRIVE 

ENTER DRIVE NUMBER AND PRESS EXECUTE 

INSERT DISKETTE BEING COPIED TO 
INTO SELECTED DISKETTE DRIVE 

ENTER DRIVE NUMBER AND PRESS EXECUTE 

Enter the number of the diskette drives you want to use for input and output. 
Enter a 1, 2, 3, or 4 to select the diskette drive you will be using. 

When the copy operation is completed, the following is displayed: 


IMAGE COPY COMPLETE 
OPTIONS ARE: 

1. RESTART FUNCTION 

2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 

Note: The format, marked file, and input/output error messages previously 
discussed for the one-diskette-drive system apply to the two-diskette-drive 
system. 
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The format of the output diskette must be equal to the format of the input 
diskette. 

The output diskette must not contain- any marked files. 



Chapter 5. Tape-to-Diskette Copy 


Tape-to-diskette copy and the diskette-to-tape copy are the same function. 
The diskette-to-tape copy is explained in Chapter 6. A chart at the end of this 
chapter shows the file types that can be copied. The file name of the tape 
input file is assigned to the diskette output file. However, if the file name of 
the tape input file does not conform to the rules for simple or complex names, 
a valid file name must be entered. The diskette output file must be marked 
before the copy operation is started. 


OPERATION 

Tape-to-diskette copy is loaded by the link command and is on file 4 on the 
IBM-supplied tape cartridge and diskette. The file name is TDTCOPY. After 
the function is loaded, the following is displayed: 

TAPE TO DISKETTE.. DISKETTE TO TAPE COPY FUNCTION 
OPTIONS ARE: 

1 . T A P E T 0 DIS K E T T E 0 0 P Y , 

2, DISKETTE TO TAPE COPY. 

ENTER OPTION , PRESS EXECUTE. 


Enter a 1 and press the EXECUTE key to select the tape-to-diskette copy. 
The following is then displayed: 


INSERT TAPE INTO TAPE DRIVE YOU WILL BE USING 
ENTER DRIVE NUMBER, PRESS EXECUTE 


INSERT DISKETTE INTO DISKETTE DRIVE YOU WILL BE USING 
E N T E R D RIV E N U M B E R, P R E S S E X E C U T E 
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Enter a 1 or 2 to select the tape drive you are using for the input file. Enter a 
1, 2, 3, or 4 to select the diskette drive you are using for the output file. After 
the EXECUTE key is pressed, the following is displayed: 

ENTER TAPE FILE NUMBER TO BE COPIED FROM 


ENTER DISKETTE FILE NUMBER TO BE COPIED TO 


Enter the number of the tape file you want to copy from. The file number can 
be up to four numeric digits. Enter the number of the diskette file you want to 
copy to. The file number can be up to four numeric digits. After the EXECUTE 
key is pressed, the copy operation begins. When the copy operation is 
completed, the following is displayed: 

COPY COMPLETED 

OPTIONS ARE: 

1, RESTART FUNCTION 

2. RETURN TO SYSTEM 

S E L. E C T 0 P T10 N, P R E S S E X E G U T E 


Hints 

• Before trying to copy a tape file, check the file type and make sure that file 
type can be copied. 

• When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

• When entering a file name for the output file, make sure the name conforms 
to the rules for simple or complex names. 

• Do not use a format 9 (1024-byte sector) diskette. 

• Make sure the diskette output file: 

- Is marked 

— Is not write-protected 
— Does not contain valuable data 

— Is large enough to contain all the data on the input file 





FILE TYPES COPIED 


Not all file types can be copied with the tape-to-diskette copy function. 
Attempting to copy some types of files causes an error. The following chart 
summarizes the tape files that can be copied. 


Tape File 
Type 

System 

File Name 

Copied 

Error 

Diskette 
File Type 

0 

3 

Marked and unused 

No 

357 


1 

1 

General exchange 
file 

Yes 


2 

2 

3 

General exchange 
file or BASIC source 

Yes 


2 

3 

1 

BASIC source file 

Yes 


2 

4 

1 

BASIC work area file 

No 

358 


5 

1 

BASIC KEYS file 

No 

358 


6 

1 

APL continue file 

No 

359 


7 

3 

APL save file 

Yes 


7 

8 

3 

APL internal data 

Yes 


8 

9 

2 

Record I/O file 

Yes 


9 l 

11 

2 

BASIC save file 

Yes 


11 

12 

2 

BASIC KEYS file 

Yes 


12 

16 

1 

Patch, tape recovery, 
and tape copy file 

No 

361 


17 

1 

Diagnostic file 

No 

361 


18 

1 

Communication file 

No 

361 


19 

1 

IMF file 

No 

361 


21 

2 

Function file 

Yes 


21 

22 

2 

Feature file 

Yes 


22 

23 

2 

IMF file 

Yes 


23 

24 

2 

Diagnostic file 

Yes 


24 

26 

2 

APL continued file 

No 

359 



System 

1 =5100 

2 =5110 

3 = 5100 and 5110 
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Chapter 6. Diskette-to-Tape Copy 


Diskette-to-tape copy and the tape-to-diskette copy are the same function. 
The tape-to-diskette copy is explained in Chapter 5. A chart at the end of this 
chapter shows the file types that can be copied. The file name of the diskette 
input file is assigned to the output tape file. The output media must be 
marked before the copy operation is started. 


OPERATION 

Diskette-to-tape copy is loaded via the link command and is on file 4 on the 
IBM-supplied tape cartridge or diskette. The file name is TDTCOPY. After the 
function is loaded, the following is displayed: 

T A P E T 0 DIS K E T "f E DIS K E T T E T 0 T A P E C 0 P Y E U N C T10 N 
OPTIONS ARE: 

1. TAPE TO DISKETTE COPY. 

2. DISKETTE TO TAPE COPY. 

E N T E R 0 P T10 N, P R E S S E X E C U T E . 


Enter a 2 to select the diskette-to-tape copy. After the EXECUTE key is 
pressed, the following is displayed: 

INSERT TAPE INTO TAPE DRIVE YOU WILL BE USING 
E N T E R D RIV E N U M B E R, P R E S S E X E C U T E 


INSERT DISKETTE INTO DISKETTE DRIVE YOU WILL BE USING 
E N T E R D RIV E N U M B E R, P R E S S E X E C U T E 
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Enter a 1 or 2 to select the tape drive you are using for the output file. Enter a 
1, 2, 3, or 4 to select the diskette drive you are using for the input file. After 
the EXECUTE key is pressed, the following is displayed: 

ENTER DISKETTE FILE NUMBER TO £E COPIED FROM 


ENTER TAPE FILE NUMBER TO BE COPIED TO 


Enter the number of the diskette file you want to copy from. The file number 
can be up to four numeric digits. Enter the number of the tape file you want to 
copy to. The file number can be up to four numeric digits. After the EXECUTE 
key is pressed, the copy operation begins. When the copy operation is 
completed, the following is displayed: 

COPY COMPLETED 

OPTIONS ARE: 

1 , RESTART FUNCTION 
2. RETURN TO SYSTEM 

S E I.., E C T 0 P T10 N , P E E S S E X E C U T E 


Hints 


• Before trying to copy a diskette file, check the file type and make sure that 
file type can be copied. 

• When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

• Make sure the tape output file: 

- Is marked 

- Does not contain valuable data 

- Is large enough to contain all the data on the input file 




FILE TYPES COPIED 


Not all file types can be copied with the diskette-to-tape copy. Attempting to 
copy some file types causes an error. The following chart summarizes diskette 
files that can be copied. 


Diskette 
File Type 

File 

Copied 

Error 

Tape 

File Type 

0 

Marked and 

unused 

No 

366 


2 

General 
exchange file 

Yes 


2 

7 

APL save file 

Yes 


7 

8 

APL internal 

data 

Yes 


8 

9 

Record I/O 
file 

Yes 


9 

B9 

Basic 

exchange 

Yes 


9 

10 

APL internal 

data 

No 

365 


11 

BASIC save 

file 

Yes 


11 

12 

BASIC KEYS 

file 

Yes 


12 

15 

APL mixed 

record file 

No 

370 


21 

Function file 

Yes 


21 

22 

Feature file 

Yes 


22 

23 

IMF file 

Yes 


23 

24 

Diagnostic 

file 

Yes 


24 

26 

APL continue 

file 

No 

364 
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Chapter 7. Tape-to-Tape Copy 


The tape-to-tape copy functions copies an entire input tape to an output tape 
or copies a selected single input file to an output file. When the entire tape is 
copied, the function marks the output tape exactly the same as the input tape 
was marked. When a single file is copied, you must mark the output file 
before the copy operation is started. 


OPERATION 

The tape-to-tape copy function is loaded via the link command and is on file 5 
on the IBM-supplied tape cartridge or diskette. The file name is TTCOPY. 

After the function is loaded, the following is displayed: 

TAPE TO TAPE COPY FUNCTION 

SELECT DESIRED COPY OPTION 
OPTIONS ARE: 

1. COPY ONE FILE 

2. COPY ALL FILES- 

SELECT 0PTION, PRESS EXECUTE 


Enter a 2 to copy the entire input tape to the output tape. Enter a 1 to copy a 
single selected input file to an output file. When you select a single file to be 
copied, the following is displayed: 

HOW MANY TAPE DRIVES WILL YOU BE USING 


OPTIONS ARE: 


1. ONE TAPE DRIVE 

2, TWO TAPE DRIVES 

S E L E C T 0 P T10 N, P R E S 8 E X E C U T E 

Enter a 1 or 2 to select the number of the tape drives. 


One-Tape-Drive Copy 

If you select the one-tape-drive option, the following is displayed: 

INSERT TAPE BEING COPIED FROM 
INTO SELECTED TAPE DRIVE 
E N T E R D RIV E N U M B E R, P R E S S E X E C U T E 
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Enter a 1 to select tape drive 1 (built-in) or a 2 to select tape drive 2 
(auxiliary). Then insert the tape cartridge used for input into that drive, and 
press the EXECUTE key. 

If you are copying a single file, the following is displayed: 

ENTER FILE NUMBER TO BE COPIED FROM 


ENTER FILE NUMBER TO BE COPIED TO 


Enter the file number you want to use. The file number can be up to three 
numeric digits. 

On a one-drive copy, the function reads data from the input tape file into the 
system's read/write storage. When the read/write storage is filled or all the 
data is read from the input tape, the following is displayed: 

INSERT TAPE BEING COPIED TO 
P R E S 8 E X E C U T E T 0 C 0 N TIN U E 


You should now remove the tape cartridge used for input from the drive. Then 
insert the tape cartridge to be used for output and press the EXECUTE key. If 
the input tape file and the output tape file are on the same tape cartridge, just 
press the EXECUTE key. The data in read/write storage is then written to the 
output tape file, and, if more data exists on the input tape file, the following is 
displayed: 

INSERT TAPE BEING COPIED FROM 
P R E S 8 E X E C U T E T 0 C 0 N TIN U E 


You should now remove the tape cartridge used for output from the drive. 

Then insert the tape cartridge used for input and press the EXECUTE key. If 

the output tape file and the input tape file are on the same tape cartridge, just 

press the EXECUTE key. The function then reads the input file into read/write 
storage. 

This procedure (reading, changing tape cartridge, writing, and changing tape 
cartridge again) continues until all data is copied. When the copy is completed, 
the following is displayed: 

TAPE COPY COMPLETED 
OPTIONS ARE: 

1 , R E S T A R T C 0 P Y F U N C T10 N 

2 . R E T U R N T 0 T H E S Y S T E M 

E N T E R 0 P T10 N , P R E S S E X E C U T E 
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Two-Tape-Drive Copy 


If you selected the two-tape-drive option, the following is displayed: 

INSERT TAPE BEING COPIED FROM 
IN T 0 8 E L E C T E D T A P E D RIV E 

E N T E R D RIV E N U M B E R, P R E S 8 E X E C U T E 


IN 8 E R T T A P E B EIN G C 0 i :: ‘ IE D T 0 
IN T 0 8 E L E C T E D T A P E D RIV E 

E N T E R D RIV E N U M B E R, P R E 8 E> E X E C U T I! 


Enter the number of the tape drives you want to use for input and output. 
Enter a 1 for tape drive 1 (built-in) or a 2 for tape drive 2 (auxiliary). If you 
enter the same tape drive number for the input tape drive and the output tape 
drive, the function defaults to a one-drive option. 

If you are copying a single file, the following is displayed: 


ENTER FILE NUMBER TO BE COPIED FROM 


ENTER FILE NUMBER TO BE COPIED TO 


Enter the file number you want to use. The file number can be up to three 
numeric digits. 

When the copy operation is completed, the following is displayed: 

T A P E C 0 P Y C 0 M P L E T E D 
OPTIONS ARE: 

.1. , R E 8 T A R T C 0 P Y F U N C T10 N 
2, RETURN TO THE SYSTEM 

ENTER OPTION, PRESS EXECUTE 
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When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

On a file-to-file copy, the output file must be marked. If the output file 
contains data, an error message is displayed. 

On a file-to-file copy, make sure the output file is large enough to contain 
all the data from the input file. 

Make sure the file you are copying to does not contain valuable data. 

When a complete tape is copied, an error message is displayed if file 
number 1 is marked. If you continue when this error occurs, the output tape 
is re-marked and the orginal data on the tape is lost. 

Make sure the correct tape cartridge is in the drive you specify for input and 
output. 
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Chapter 8. Diskette Compress 


As a result of the marking, dropping, freeing, and re-marking of files, unused 
sectors can exist between extents for files. The function of diskette compress 
is to place all unused sectors into one area. To do this, the function rewrites 
all files on the diskette as close to cylinder 0 (beginning of the diskette) as 
possible. The first file on the diskette that has unused space before it is 
rewritten starting at the end of the preceding file or at the end of the label 
area. The next file is then rewritten starting at the end of the first file that was 
rewritten. This continues until all files on the diskette are moved ahead as 
close to the preceding file as possible. Any unused space that existed 
between files is removed. This space now exists at the end of the diskette and 
can be used for additional files. 

Note: Diskette compression is performed automatically when 
diskette-to-diskette copy is used to copy an entire diskette. 


OPERATION 

Diskette compress is loaded by the link command and is on file 6 on the 
IBM-supplied tape cartridge or diskette. The file name is COMPRESS. After 
the function is loaded, the following is displayed: 


THIS IS THE COMPRESS FUNCTION 


P R E S S E X E C I...I T E T 0 C 0 N TIN U E 


After the EXECUTE key is pressed, the following is displayed: 

SELECT DRIVE YOU WILL BE USING 
j. , 2 .. 3 0 R 4- 

L 0 A D DIS K E T T E A N D P R E S S E X E 0 U T E 
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Enter a 1, 2, 3, or 4 to select the diskette drive you will be using. Insert the 
diskette you want to compress in that drive, then press the EXECUTE key. The 
function now moves all the files. After all files have been successfully moved, 
the following is displayed: 

COMPRESS COMPLETE 
OPTIONS ARE: 


1 . RESTART FUNCTION 
2.RETURN TO SYSTEM 

ENTER OPTION NUMBER AMD PRESS EXECUTE 


Hints 

• A diskette read or write error can prevent successful completion of the 
compress function and could make the file that had the error unusable. 

After the error occurs, a message is displayed indicating whether the data 
has been restored to its original address. 

. The files on a format 9 (1024-byte sector) diskette cannot be compressed. 

• The diskette-to-diskette copy function also compresses the output diskette. 

When a header label error occurs, an attempt is made to restore the data 
back to the original location. A message is displayed indicating whether the 
data was restored. However, the data in the file is not usable because of 
the header. The diskette recovery function can be used to correct the 
header and thus recover the data in the file. 



Chapter 9. Label Display 


The label display function displays the diskette volume label, diskette ERMAP 
(error map) label, or diskette and tape file header labels. The contents of these 
labels are displayed and can also be printed. 

A current record of the label information is helpful if a read error occurs on the 
diskette or tape label. The diskette and tape recovery functions request 
information to construct a new label. All the information requested by the 
recovery functions is available from the label display function output. 

Labels on any diskette that is access-protected cannot be displayed. 


OPERATION 

The label display function is loaded by the link command and is on file 7 on 
the IBM-supplied tape cartridge or diskette. The file name is LDISPLAY. 

After the function is loaded, the following is displayed: 

SYSTEM LABEL DISPLAY OPTIONS ARE: 

1. DISPLAY FROM TAPE 

2. DISPLAY FROM DISKETTE 

3. RETURN TO SYSTEM 

E N T E R 0 P T10 N N U M B E R, P R E S S E X E C U T E 


Enter a 1 to display tape labels, a 2 to display diskette labels, or a 3 to cancel 
the function and return to the language. The abbreviations used in the label 
displays and printouts are shown later in this chapter. 


Display Tape Labels 

The following is displayed when the display tape labels option is selected: 


TAPE LABEL DISPLAY OPTIONS ARE: 

. 1 . , DIS P L A Y T A P E H E A D E R L A B E L < S ) 
2 . DIS P L A Y F R 0 M DIS K E T T E 
3. RETURN TO SYSTEM 

E N T E R 0 P T10 N N U M B E R , P R E S S E X E C U T E 
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Enter a 1 to display tape header labels, a 2 if you want to go back and display 
diskette labels, or a 3 to return to the system. When a 1 is entered, the 
following is displayed: 


D :r. S P L A Y T A P E M E A D E R L A B E1., < S) 

E NIE R DI8 P L A Y S T A T E H E N T 


D .■ P .■ ### t v???8 


D.D R 3! V E N U M B E R < 1 0 R 2 ) , 

p . p R IN T L A B E L ? < 0 = N 0 .■ 1Y E 8 .• 0 R 2 :::: A U T 0 

U .FIL E R A N G E : FIR S T FIL E , L A S T FIL E 


OR ENTER 0 TO STOP 
A N D T H E N P R E 8 8 E X E C U T E 


The first parameter selects the tape drive. Enter a 1 to select tape drive 1 
(built-in) or a 2 to select tape drive 2 (auxiliary). 

The next parameter specifies whether you want the labels printed or just 
displayed. Enter a 0 to display the labels. Enter a 1 or 2 to print the labels on 
the printer. When a 1 is entered, the function stops after each label is printed; 
you must press the EXECUTE key to have the next label printed. When 2 is 
specified, the function does not stop until all labels are printed. Pressing the 
ATTN key causes the printing to stop. 

The next two parameters specify the beginning and ending file numbers. The 
file numbers can be up to three digits. Only the beginning (FIRST FILE) file 
number need be entered if only one label is to be displayed. 

A comma must be entered between the parameters. After all the parameters 
are entered and the EXECUTE key is pressed, the labels on the tape in the 
selected tape drive are displayed and printed if print is specified. 


Display Diskette Labels 


The following is displayed when the display diskette labels option is selected: 


DISKETTE LABEL DISPLAY OPTIONS ARE: 


1, DISPLAY ERMAP LABEL 

2. DISPLAY VOLUME LABEL 

3 , DI S P L A Y D I S !< E T T E H E A D E R L A B E L C S > 
i+, DISPLAY FROM TAPE 
5. RETURN TO SYSTEM 


E N T E R 0 P T10 N N U M B E R, P R E S S E X E C U T E 


Enter a 1, 2, or 3 to select the type of diskette labels you want displayed. 
Enter 4 if you want to display a tape label, or a 5 to return to the system. 
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Display ERMAP Label 


The following is displayed when the display ERMAP label option is selected: 


DISPLAY ERMAP LABEL 


E N T E R D I! S P L A Y 8 T A T E M E N T D , P 

D.D RIV E N U M B E R (1 .■ 2 , 3 , 0 R 4 > , 

P.P RIN T A B E L. ? < 0 == N 0 0 R 1 :::: Y E S > 


OR ENTER 0 TO STOP 
AND THEN PRESS EXECUTE 


Enter the diskette drive number followed by a comma. Enter a 0 if the label is 
to be displayed, or a 1 if the label is to be printed. When the EXECUTE key is 
pressed, the ERMAP label on the diskette in the selected diskette drive is 
displayed and printed if print is specified. 


Display Volume Label 


The following is displayed when the display volume label option is selected: 


DISPLAY VOLUME LABEL 


E N T E R D I! S P!.., A Y S T A T E M E N T 


D, P 


D.DRIVE NUMBER Cl... 2, 3.- OR 4-> , 

P.P RIN T L A B E L ? < 0 ^ N 0 0 R 1 = Y E S ) 


OR ENTER 0 TO STOP 
AND THEN PRESS EXECUTE 


Enter the diskette drive number followed by a comma and a 0 if the label is 
just displayed, or a 1 if the label is to be printed. When the EXECUTE key is 
pressed, the volume label on the diskette in the selected diskette drive is 
displayed and printed. 


Display Diskette Header Labels 

The following is displayed when the display diskette header labels option is 
selected: 


DISPLAY DISKETTE HEADER LABEL<S) 


E N T E R DIS P L A Y S T A T E M E N T D , P , tt # # #*, # # # tt 

D . D R IV E N I. J H B E R ( 1, 2 , 3 , 0 R 4 ) , 

! :> . P RIN T L A B E L ? < 0 - N 0 , 1 = Y E S .. 0 R 2 = A U T 0 ) , 

tt.FIL E R A N G E : PI R S T F11... E , I... A S T FIL E 

OR ENTER 0 TO STOP 
AND THEN PRESS EXECUTE 
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The first parameter selects the diskette drive. The next parameter specifies 
whether you want the labels printed or displayed. Enter a 0 to display the 
labels. Enter a 1 or 2 to print the labels on the printer. When a 1 is entered, 
the function stops after each label is printed; you must press the EXECUTE key 
to have the next label printed. When 2 is specified, the function does not stop 
until all labels are printed. Pressing the ATTN key causes the printing to stop. 

The next two parameters specify the beginning and ending file numbers. The 
file numbers can have up to four digits. Only the beginning (FIRST FILE) file 
number need be entered if only one label is to be displayed. 

A comma must be entered between the parameters. After all the parameters 
are entered and the EXECUTE key is pressed, the labels on the diskette in the 
selected drive are displayed and printed if print is specified. 


DISPLAY FORMAT 


The IBM Diskette General Information Manual , GA21-9182, provides detailed 
information on each of the fields in the diskette ERMAP label, volume label, 
and file header label. The following is a list of abbreviations used for the 
displays and printouts. 


Abbreviation Meaning 


FLDNAME 

P 

LNTH 

CONTENTS 


Name of the field in the label 
Position of the field in the label 
Length of the field in bytes 
Contents of the field 


ERMAP Label 

The ERMAP label contains information about the number and location of any 
defective cylinders on the diskette. The following is a list of abbreviations used 
for the ERMAP label. 

Abbreviation Meaning 

LABLID Label identifier (ERMAP) 

DEFCYL No defective cylinder indicator 

or first defective cylinder number 
DEFCYL No second defective cylinder indicator 

or second defective cylinder number 
DEFECT Diskette defect indicator 

DRTIND Error directory indicator 

ERRDRT Error directory 
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Volume Label 

The volume label contains information about the format of the diskette. The 
following is a list of abbreviations used for the volume label. 


Abbreviation Meaning 


LABLID 

VOLID 

ACCESS 

SYSID 

OWNRID 

LBLXTN 

VOLSRF 

XTNTAR 

SPLREQ 

PHYRLN 

PHYRSQ 

LBLSTD 


Label identifier and label number (VOL1) 

Volume identifier 

Accessibility 

System identification 

Owner identification 

Label extension indicator 

Volume surface indicator 

Extent arrangement indicator 

Special requirements indicator 

Physical record length of available space 

Physical record sequence code 

Label standard version 


Diskette File Header Label 

The diskette file header label defines the contents and format of the associated 
diskette file. The following is a list of abbreviations used for the diskette file 
header label. 


Abbreviation Meaning 


LABLID 

FILEID 

BLKLNG 

RCDATT 

BOE 

PHYRLN 

EOE 

RBLKFT 

BYPASS 

DSSRTY 

WRTPRT 

XCHGTP 

MLTVOL 

VOLSQ# 

CRDATE 

RCDLNG 

OFFSET 

EXDATE 

VFYCPY 

DSORG 

EOD 

SYSCOD 

FILTYP 


Label identifier and label number (HDR1) 

Data set identifier 

Block length 

Record attribute 

Beginning of extent 

Physical record length 

End of extent 

Record block format 

Bypass indicator 

Data set security 

Write-protect indicator 

Exchange type indicator 

Multivolume data set indicator 

Volume sequence number 

Creation date 

Record length 

Offset to next record space 
Expiration date 
Verify/copy indicator 
Data set indicator 
End-of-data address 
System code 
File application type 
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Tape File Header Label 

The tape file header label defines the contents and format of the tape file. The 
following is a list of abbreviations used for the tape file header label. 


Abbreviation Meaning 


FILTYP 

FILE# 

FLSZKB 

SEQREL 

EOD 

FILEID 

BASTMT 

BASKEY 

APLMSP 

APLWS1 

APLSVI 

APLWS2 

APLMSZ 

APLMXL 

APLMX# 


File type 

File number 

File size in K-bytes 

Sequential relocate indicator 

End of data 

File identification 

First and last BASIC statement number 
BASIC keys 

APL read/write storage starting address 
Length of the first half of the user's workspace 
SVI starting address 

Length of the second half of the user's workspace 
Machine size 

Maximum logical record length 
Maximum logical record number in the file 
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Chapter 10. Diskette Recovery 


The diskette recovery function allows you to read a file when a read error 
occurs on the volume label (errors 015, 024, 025), header label (errors 015, 
038), or data portion (error 017) of the file. The function saves as much of the 
data on the file as possible. The function can be used to recover data from the 
following file types: 


02 General exchange 
08 APL internal data 
09 Record I / O 

The diskette recovery function can be used on labels for all file types. 

Note: To ensure a successful recovery from a read error on a label, you should 
have a current record of the output from the label display function (see Chapter 
9). This record provides the information needed to reconstruct the label. You 
should also make sure you have room for one more header label on the 
diskette. 


OPERATION 

The diskette recovery function is loaded by the link command and is on file 8 
on the IBM-supplied tape cartridge and diskette. The file name is DRECOVER. 
After the function is loaded, the following is displayed: 

DXSKETIE RECOVERY R.JNCT XON 
OPTIONS ARE: 

1. VOLUME LABEL RECOVERY 

2. HEADER LABEL RECOVERY 

3. DATA FILE RECOVERY 

ENTER OPTION NUMBER AND PRESS EXECUTE 


After the option is selected, the following is displayed: 

ENTER DRIVE NUMBER 

INSERT DISKETTE INTO SELECTED DRIVE 
PRESS EXECUTE 
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After the diskette drive number is entered and if option 2 or 3 was selected, 
the following is displayed: 

ENTER FILE NUMBER 
PRESS EXECUTE 


After the file number is entered, the function begins the recovery procedure. 


Volume Label Recovery 

The function attempts to read and check the volume label. If the label is found 
to be error free, an error message is displayed. If an error is found, the 
function requests the following information to create a new volume label: 

• Label area extended indicator (valid entries are blank, 1 -9) (LBLXTN) 

• Volume surface indicator (valid entries are 1, 2, or 2D) (VOLSRF) 

• Length of physical record (valid entries are blank for 128, 1 for 256, or 2 for 
512) (PHYRLN) 

• Physical record sequence (valid entries are blank, 1-13) (PHYRSQ) 

The function uses default values for the other fields in the label. The new label 
is then written on the diskette. If the new label cannot be written without 
error, an error message is displayed. If the new label is written without error, 
the recovery is complete. 

You can check if the volume label you created contains valid data. To do this, 
perform the volume label recovery option again. If error code 278 occurs, the 
label contains valid data. If the function requests information to create a new 
volume label, the information you supplied for the first volume label was not 
valid. 

If recovery was successful, you should copy the data from the diskette that 
had the error to another diskette. Then initialize the diskette that had the error. 
If an error occurs on the initialize function, the diskette should not be used. 



Header Label Recovery 

The function attempts to read the header label. If the label can be read, an 
error message is displayed. If an error is found, the function requests the 
following information to create a new header label: 

• Block length (BLKLNG) 

• Record attribute (RCDATT) 

• Beginning of extent (BOE) 

• End of extent (EOE) 

• Exchange type indicator (XCHGTP) 

• Record length (RCDLNG) 

• Offset to the next record (OFFSET) 

• Data set organization indicator (DSORG) 

• End of data (EOD) 

. File type (FILTYP) 

The function then tries to write the new label over the label causing the error. 

If the label can be written without error, recovery is complete. If an error 
occurs, the function requests a file number to write the new label. The 
function then writes the new label at the new location. 

You can check if the header label you created contains valid data. To do this, 
perform the header recovery option again. If error code 284 occurs, the label 
contains valid data. If the function requests information to create a new header 
label, the information you supplied for the first header label was not valid. 

When recovery is complete, you should copy the data from the diskette that 
had the error to another diskette. Then initialize the diskette that had the error. 
If an error occurs on the initialize function, the diskette should not be used. 
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Data File Recovery 


This function reads the file until the sector that caused the error is found. The 
function then deletes the sector or writes blanks in the sector. Since the sector 
can contain data from more than one record, all records (in preceding and 
following sectors) with data in the sector with the error is lost. 

If the function is successful in writing over the error, the recovery is complete. 

If an error occurs when the function is recovering data from a type 2 or 8 file, 
an error message is displayed. If an error occurs when the function is 
recovering data from a type 9 file, the following is displayed: 

OPTIONS: 

:!. , RESTART FUNCTION 

2. RETURN TO SYSTEM 

3. CONTINUE WITH FUNCTION 

ENTER OPTION NUMBER AND PRESS EXECUTE 
RECOVERY ERROR 293 


When option 3 is selected, the file is copied to another file. You can select a 
file to which the file that caused the error will be copied. The two files may be 
on the same diskette or different diskettes. This copy is similar to the 
diskette-to-diskette copy described in this manual. The function issues 
prompting messages to assist you in doing the copy. 

When recovery is complete, you should copy the data from the diskette with 
the error to another diskette. Then initialize the diskette that had the error. If 
an error occurs on the initialize function, the diskette should not be used. 



Chapter 11. Tape Data Recovery 


The tape data recovery function is used to read a file when a read error occurs. 
The function saves as much of the data in the file as possible. The function 
works on the following file types: 

01 General exchange 
02 General exchange or BASIC source 
03 BASIC source 
08 APL internal data 


OPERATION 

The tape data recovery function is loaded by the link command and is on file 9 
on the IBM-supplied tape cartridge or diskette. The file name is TRECOVER. 

After the function is loaded, the following is displayed: 

TAPE 1 DATA RECOVERY FUNCTION 
ENTER DRIVE NUMBER 


Enter a 1 to select tape drive 1 (built-in) or enter a 2 to select tape drive 2 
(auxiliary). Press the EXECUTE key. The following is then displayed: 


DATA IS RECOVERED FROM FILES HAVING TAPE READ ERRORS. 
FILE TYPES 01, 02, 03, AND 08 CAN BE PROCESSED. 

LOAD CARTRIDGE WITH READ ERRORS IN TAPE UNIT. 

ENTER FILE NUMBER (UP TO 3 DIGITS) AND PRESS EXECUTE. 


Insert the tape with the read errors in the selected drive. Enter the file number 
of the file with the errors. Up to three digits can be entered for the file 
number. 
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The recovery function reads the file until the record that caused the read error 
is found. The function then writes blanks in the logical record with the error. 
If the record cannot be written back without error, all the data iri the physical 
tape record (512 bytes) will be lost. Because the physical tape record may 
contain part of logical records from the preceding and following physical 
records, these logical records are lost also. For example: 


Physical 

Record 


Logical 

Record 


X 


Error occurs here. 


Correcting the error in logical record 3 will cause logical records 2, 3, and 4 to 
be lost. 



Chapter 12. Tape Header Recovery 


The tape header recovery function is used to recover the data from a file when 
an error occurs while the header label is being read. The header label contains 
information that defines the file. The function works on headers for all files. 

Note: To ensure a successful recovery from a read error on a header label, you 
should have a current record of the output from the label display (see Chapter 
9). This record provides the information needed to reconstruct the tape header 
label. 


OPERATION 

The tape header recovery function is loaded by the link command and is on file 
10 on the IBM-supplied tape cartridge or diskette. The file name is 
HRECOVER. After the function is loaded, the following is displayed: 


ape hi;: 

:ader recovery i 

"TJNCT ION 




NSERT 

TAPE WITH HEAD! 

ER CEO EE EC 

3R. INTO 

1 SELECT 

ted drive: 

NTEE l 

iRIVE NUMBER 





eess s:: 

EXECUTE 






Insert the tape with the read errors in a tape unit. Enter a 1 to use tape drive 
1 (built-in) or enter a 2 to use tape drive 2 (auxiliary). 

The recovery function reads the tape until the header that caused the read 
error is found. The function then requests the following information to create a 
new header: 

- File type (FILTYP) 

- File size in K-bytes (FLSZKB) 

- Sequential relocate indicator (SEQREL) 

- End of data (EOD) 

- First and last BASIC statement number (BASTMT) 

- BASIC keys (BASKEY) 

- APL read/write storage starting address (APLMSP) 

- Length of the first half of the user's workspace (APLSV1) 

- SVI starting address (APLSVI) 

- Length of the second half of the user's workspace (APLSV2) 

- Machine size (APLMSZ) 

- Maximum logical record length (APLMXL) 

- Maximum logical record number in the file (APLMX#) 
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The function then tries to write the new header over the header that caused 
the read error. If successful, the recovery is complete. If an error occurs, a 
message is displayed. This message gives you the option of copying the files 
from the tape with the read error to a different tape. 

If you select the copy option, the function issues prompting messages to aid 
you in doing the copy. The file with the read error and all following files are 
copied to the other tape. The output tape is marked during the copy operation 
starting at the file copied to. For example, if a tape had 6 files and file 4 had a 
bad header, files 4, 5, and 6 would be copied. These three files could be 
added to another tape that already had 10 files. Files 11, 12, and 13 on the 
output tape would be marked as the data was being copied to the tape. 



Chapter 13. Diskette Sort Feature 


The Diskette Sort feature is optional on the IBM 5110. This feature allows you 
to change the order of the records in a file by doing a record sort or an 
address out sort. (The Diskette Sort feature is also referred to as sort.) 

The record sort option creates a new file with the records in the sorted order. 
The address out option of the sort creates a file that contains the address of 
the records in the sorted order. The sort operates faster when an address out 
file is used because it does not have to write all of the records on the output 
file. Also, a smaller file can be used for output because the file contains only 
the addresses and not the data. 

The Diskette Sort feature does not have to be loaded from tape or diskette 
before it is used. To execute sort use the )SORT (for APL) or UTIL SORT (for 
BASIC) command. You can also execute sort by using the procedure file from 
APL or BASIC. The use of the procedure file is discussed later in this chapter. 

The remaining information on sort is divided into the following main topics: 

Introduction to Gives an overview of why 

sort you would want to sort 

Files Defines the characteristics 

of the files used by the 
sort program 

Statements Gives the syntax and a 

definition of each of the 
statements used by the sort 
program 

Operation Explains how to use the 

sort program and shows the 
displayed messages 

Additional Discusses performance considerations 

Information and programs to determine work file size 
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INTRODUCTION TO SORT 


The following is an example of how you could use the sort program to prepare 
a report. The files and the report are described first. The actual sort 
statements are shown when the sort statements are discussed. 

For this example, assume that you have a file, named MASTER, that contains a 
record for each of your customers. Each record has the customer number and 
name, the sales representative, the year-to-date (YTD) sales, and other 
information about the customer. The customer number has six digits. The first 
four are the customer identifier, and the last two are the sales territory 
associated with the customer. Assigning the customer numbers this way 
allows you to summarize your sales by territory easily. This file could have 
been created by an APL or BASIC program and would look like this if it were 
formatted and printed: 


Customer 

YTD 

Sales 



Number 

Sales 

Rep 

Customer Name 


133101 

90 0,0 0 

CLAIR 

SMITH LUMBER 

WEST 

133102 

830,00 

MEL 

SMITH LUMBER 

EAST 

231101 

90 0.0 0 

CLAIR 

R AND D PUMPS 


287502 

6 0 0 , 0 0 

DON 

DANS FLOWERS 


303802 

950.00 

DON 

SAMS BOOKS 


369101 

1700,00 

MARTY 

NORTHWOOD BOA 

TS 

071 01 

10 0 . 0 0 

CLAIR 

NORTHLAND CAR 

S 

1+57101 

10 0 0 . 0 0 

CL AI R 

K AND K WHOLE 

SALE 

508702 

-• 10 0 . 0 0 

DON 

SUNSHINE FLOO 

RS 

550101 

20 0 0,0 0 

MARTY 

DONS WORLD 



Positions 1 through 4 are the customer identifier; positions 5 and 6 are the 
sales territory. Position 7 is the sign position for the YTD sales in positions 8 
through 14. The sales representative is in positions 15 through 19. The 
customer name is in positions 20 through 36. Positions 37 through 128 are 
used for additional information. There are 1000 records in the file. The file is 
file 1 on a diskette in drive 1 and is named MASTER. 




As you can see, the file is in ascending order by customer number. Now 
assume you want to print a report that shows by territory and sales 
representative the YTD sales for each customer. You want the customers 
within each group to appear in descending order of YTD sales on the report. 
The sort program allows you to use up to six different fields to determine the 
order of the records. Such a report could look like this: 



Sales 

YTD 


Customer 


Terr 

Rep 

Sales 


Number 

Customer Name 

0 1 

CLAIR 

1 0 0 0 

, 0 0 

4-57101 

!< AND K WHOLESALE 



90 0 , 

, 00 

133101 

SMITH LUMBER WEST 



90 0 

, 0 0 

231101 

R AND D PUMPS 



1 0 0 , 

, 0 0 

*10 7101 

NORTHLAND CARS 

01 

MARTY 

20 0 0 

, 0 0 

550101 

DONS WORLD 



170 0 , 

0 0 

369101 

NORTHWOOD BOATS 

0 2 

DON 

950 , 

, 0 0 

303802 

SAMS BOOKS 



6 0 0, 

0 0 

287502 

DANS FLOWERS 



- 10 0 , 

, 0 0 

508702 

SUNSHINE FLOORS 

02 

MEL 

83 0 , 

0 0 

133102 

SMITH LUMBER EAST 


The first column of the report shows the territory. The next column is the sales 
representative. The next three columns show the YTD sales, customer 
numbers, and customer name in order by the YTD sales. The highest YTD 
sales for each sales representative is shown first. 

You must write an APL or BASIC program to print this report. But first you 
must sort the file to get the records in the order they are to appear on the 
report. The sorted file is named SALES. The examples used in this chapter 
deal with sorting the MASTER file to get the SALES file. The following shows 
the order of the records in the SALES file: 


Customer YTD Sales 

Number Sales Rep 


Customer Name 


4-57101 
133101 
231101 
'•107101 
550101 
369101 
303802 
287502 
508702 
133102 


100 0 

. 00 

CLAIR 

90 0 

, 0 0 

CLAIR 

90 0 

. 0 0 

CLAIR 

10 0 , 

, 0 0 

CLAIR 

20 0 0 , 

, 00 

MARTY 

170 0 , 

0 0 

MARTY 

950 , 

, 0 0 

DON 

60 0 . 

00 

DON 

10 0, 

, 0 0 

DON 

830 . 

00 

MEL 


K AND K WHOLESALE! 
SMITH LUMBER WEST 
R AND D PUMPS 
NORTHLAND CARS 
DONS WORLD 
NORTHWOOD BOATS 
SAMS BOOKS 
DANS FLOWERS 
SUNSHINE FLOORS 
SMITH LUMBER EAST 
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FILES 

The sort program uses an input, output, and, for some sort jobs, a work file. 

All files must be diskette files. The program reads the records from the input 
file. The sort fields (fields of the record that are used to determine the order of 
the records) and the location of the record in the input file (addresses) are 
called keys. The keys are stored in the system. The sort program uses the 
same area of the system that APL uses for its workspace or that BASIC uses 
for its work area to store the keys. This part of the system is called the read 
and write storage (R/W storage). 

When a large input file is sorted, more space may be required to store the 
keys than is available in R/W storage. The work file is used to provide the 
additional space. 

The sort program fills R/W storage with keys, and the keys are sorted. The 
sorted keys are then written on the work file. The sort program reads the 
complete input file in this manner. After all input records are read, the program 
does a final sort on all the keys. 

In the standard sort, the program uses the sorted keys to read the input file 
again. This time the records are read from the input file and are written to the 
output file. Thus the input file remains in the original order, and the output file 
is in the sorted order. 


Master Sales 



If an address out sort is specified, the program uses the sorted keys to write 
the location of the input record to the output file. Thus the output file (address 
out file) contains a 4-byte binary logical record number (relative record number) 
for each of the records in the input file. 

You can then read the relative record numbers from the address out file and 
use them to directly access records from the input file. 
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For example: 


Relative Record Number 



access the master file 
in ascending order. 


The following statements might be used in a program to access a file in order 
using the record numbers in the address out file: 


<:• 

<> 


0 030 

OPEN FIL 

E FLI, 'D 8 0' ,I, 

'NAMES’,ALL 

0 O'-l-O 

OPEN FIL 

E FL2,’DB0’,2, 

1 ADDSDRI * ,IN 

0 050 

READ FIL 

E USING 060, ! :: 

I../2, R 

0 06 0 

0 070 

FORM BO¬ 
RE AD FIL 

E FLI, REOR,P 



<> 


<> 
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Input File 

The input file must be a record I/O (type 9) data file created on the IBM 5110. 
Record I/O data files created on other devices may be used if the 
characteristics are the same as those of the 5110 files. If the characteristics 
are not correct, one of the following error codes will result: 

Error Meaning 

336 The block length for a blocked-spanned 
file does not equal the sector size. 

342 A multivolume file cannot be used. 

344 The input file exchange type is not supported. 

345 A variable-length logical record cannot be used. 

355 The diskette file expiration date is not blank. 

All diskette formats except format 9 (1024-byte sectors) can be used for this 
file. The file can have either sequential or random organization. The records 
can be any valid length and can be blocked-spanned or unblocked-unspanned. 

In an unblocked-unspanned file, one record is written on each sector. The 
records cannot be longer than the size of the sectors. If they are shorter, the 
additional space in the sector is unused. 


Space Not Used in the Sector. 


100-Byte Record 28 Bytes 

■ ■ -. -■ • ■ r ■■ 

100-Byte Record 28 Bytes 

100-Byte Record 

28 Bytes 

For a blocked-spanned 
example, if you have a 
the first record and 28 
sector of the file. 

file, the records span the limil 
sector size of 128 bytes and a 
bytes of the second record are 

- 7 --- 

128-Byte Sectors 

s of the sectors. For 
record size of 100 bytes, 
written on the first 

100-Byte Record 

100-Byte Record 

V- —= J 

100-Byte Record 
—r-1— 

—^- 1 


128-Byte Sectors 
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Output File 


The file used as an output file by the sort program must be a marked, unused 
file. When you are using blocked-spanned input files: 

• After a standard sort is completed, the output file has the same 
organization, logical record length, and record format as the input file. 

• After an address out sort is completed, the output file has a 
blocked-spanned format with a record length of four. 

When you are using unblocked-unspanned input files, you can only do an 
address out sort. In this case, the output file has a blocked-spanned format 
with a record length of four. 


Output File Size for Blocked-Spanned File 

The marked size of the output file in a standard sort for blocked-spanned 
records must be equal to or larger than the input file. This allows all the 
records from the input file to be written to the output file after they are sorted. 


Output File Size for Address Out File 

The marked size of the output file in an address out sort for blocked-spanned 
or unblocked-unspanned input file is computed as follows: 


K-bytes = (number of records in the input file) 

256 


Use the next K larger file size. 
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Work File 

Some sort jobs do not need a work file. However, if the storage needed to do 
the sort is greater than your system's R/W storage size, your sort job needs a 
work fHe. You can determine approximately how large the work file must be 
by using the charts in Appendix A. Because these charts do not show all 
possible combinations, a formula is shown later in this chapter for that 
purpose. The charts assume you have no IMFs loaded and you are not using a 
procedure file. IMFs and a procedure file use part of the system's R/W 
storage. 


How To Use Work File Size Charts 

Charts are provided in Appendix A for all system R/W storage sizes and all 
work file diskette sector sizes. Use the chart that matches your system and 
diskette. 

Across the top of each chart are the sort control field sizes. The size of the 
control field is the combined length of all the fields used to determine the sort 
order. Down the left side are the number of records in the file. The numbers 
in the chart show the approximate minimum size for the work file in K-bytes. 

If your exact sort field size or number of records does not appear in the chart, 
use the next higher value to make sure that you have a large enough work file. 
A zero entry in the chart means that a work file is not needed. Also, a work 
file is not needed if fewer than 100 records are sorted. 

The numbers that appear on the extreme right side of the chart are diskette 
format numbers. The lines in the chart show the maximum capacities at which 
that format diskette can be used. Your work file size must appear above the 
line for the diskette format you are using. 
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For example, assume you have a 16K system with a 128-byte diskette sector 
size and format 1. You would use the following chart from Appendix A. 


SYSTEM SIZE- 16K 

WORK FILE SECTOR SIZE* 128 


MASK LENGTH 


RECORDS 4 

8 

12 

16 

20 

24 

28 

32 

36 

40 

44 

48 

CTO 

U Sim 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

9 

12 

12 

17 

17 

17 

17 

17 

17 

33 

500 

0 

0 

9 

12 

14 

17 

34 

44 

44 

66 

66 

66 

66 

66 

66 

128 

750 

7 

11 

13 

34 

40 

50 

50 

66 

66 

96 

96 

96 

98 

98 

98 

190 i 

1000 

9 

14 

34 

46 

54 

66 

66 

86 

86 

128 

128 

128 

128 

128 

128 

252 

1500 

26 

40 

50 

66 

78 

98 

96 

128 

130 

190 

190 

190 

192 

192 

192 

378 4 

2000 

34 

54 

66 

88 

104 

128 

128 

170 

172 

252 

nsr 


254 

254 

$54 


250 0 

42 

66 

82 

108 

130 

160 

160 

212 

214 

316 

316 

316 

318 

318 

318 


3000 

50 

80 

98 

130 

154 

192 

190 

|252 

256 

378 

378 

378 

380 

380 

380 


3500 

58 

92 

112 

150 

180 

n2 r > 

999 

A - *1. *Z~. 

[294 

298 

440 

44 0 

440 

444 

444 

444 


5000 

82 

130 

160 

2141256 316 

316 

*t20 

4241 







7500 

122 

194 

238 [320 

382 

474 

472 










10000 

160 

risr 

316 

426 

! 












15000 

240 

384 

474 

1 













200 0 0 

318 
















30000 

476 

















For our example, the records have a 15-position control field with 1000 
records in the file. We must use a 16-position control field because the chart 
does not show a 15-position control field. From the chart you can see that a 
work file of at least 46K would be required. 


The work file must be a marked, unused file. When the sort is finished, the 
program displays a message to indicate work file usage. Then the program 
marks the work file as an unused file. 


Control File 

The control file contains sort statements. The sort statements are read from 
the control file each time the sort program is executed, eliminating the need to 
rekey the sort statements. The sort statements for a given sort are identified 
by the sort group name parameter in the sort group name statement. 
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You can write an APL or BASIC program to create the control file. Two simple 
methods of creating a control file are shown later. Any diskette format except 
format 9 can be used for the control file. The control file must: 

• Be a record I/O data file 

• Have blocked-spanned records 

• Have a logical record length of 64 

The sort statements for each sort group must be written on the control file in 
the same order as they are specified for the sort program. The order of the 
statements is: 


1. Sort group name 

2. Comment (optional) 

3. SORT 

4. MASK 

5. ALTS (optional) 

6. WORK (optional) 


Each group of sort statements must have a unique name specified for the 
sort-group-name parameter of the sort group name statement. Up to 150 sort 
statements can be in a single group on a 16K system; more statements can be 
used with a larger system. The amount of R/W storage available determines 
the number of statements that can be in a sort group. The sort-group-name is 
used to retrieve the correct group of sort statements from the control file. The 
sort statements are read from the control file by a FILE statement. 

The following is the sort group for our example. 

SALES 

k-SORT CUSTOMER FILE BY TERRITORY, SALES REP AND YTD SALES 
8 0 R T I, M A S T E R , 1, 1 , S A L E S , 2 
MASK 5,2,A,15,5,A,7,8,0 
WORK 2,1. 
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How to Create A Control File 

The following are two methods of creating the control file. One method uses 
APL, the other BASIC. Both methods create a file named CONTROL on file 1 
on diskette drive 1. 


APL: Use the following APL statements to create the control file for our 
example. 


1. 1 CIS VC) ’OUT* 

2. C) U T « •' 0 U T F 1 :l. 0 01 ID :::: (C 0 N T R 0 L) T Y P E «I * 

3. C)UTf-6Mt ' ** SALES ' 

3. OUT*-6 4-1 1 #80 RT CUSTOMER FILE BY TERRITORY, SALES REP AND YTD SALES' 
3. 0 U T ir 6 1+1 ' S 0 R T 1, M A S T E R, 1, .1. # S A L.E S, 2 * 

3. OUTf-6 L l-1 ' MASK 5,2 , A , 15,5, A, 7,8,0 ‘ 

3. OUTf-AM-t ‘ WORK 2,1' 

4. Ol.n>\0 


Statement 1 offers a shared variable called OUT. Statement 2 assigns the 
open parameter string to the shared variable. Statement 3 is repeated for each 
sort statement you want to write on the file. Statement 4 closes the file. 


BASIC: Use the following steps in BASIC to create the control file for our 
example. 


1. 

LOAD 

0,DATA 



2. 

n n i n 

8 A L. E S 



2. 

0 0 2 0 

#80 RT CUSTOMER 

FILE BY TEI 

4RITGRY 

2. 

0 0 3 0 

SORT 1,MASTER,1 

, 1,SALES,2 


2. 

0 0 !■!• 0 

MASK 5,2, A , :l. 5,5 

, A , 7,8,0 


2. 

{) 0 5 0 

WORK 2,1 



3. 

SAVE 

1, ' CONTROL ! ,EEC 

L :::: 6M-, D80 



Statement 1 allows you to enter data from the keyboard into the work area. 
Statement 2 is the data for the sort statements. Enter each line after the line 
number and colon are displayed. Statement 3 writes the data from the work 
area on the file. 
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STATEMENTS 


The sort statements may be entered from the keyboard or read from a control 
file. The sort statement length must not exceed 64 characters. Spaces are not 
allowed within or between the parameters of sort statements. If a space is 
found, error 302 is displayed. Also blanks (spaces) must follow the last 
parameter; if they do not, error 304 results. An exception is that a comma may 
follow the last parameter of an ALTS statement. 

The six types of sort statements and their order of entry are: 

1. Sort group name statement (required only with control file) 

2. Comment statements (optional only with control file) 

3. SORT statement 

4. MASK statement 

5. ALTS statement (optional) 

6. WORK statement (optional) 


FILE Statement 

A FILE statement is entered from the keyboard or read from a procedure file. 
The FILE statement specifies where the control file is located and which sort 
group to read. The command syntax is: 

FILE sort-group-name, control-file-number, [control-filename], 

drive-number 

where: 


sort-group-name, is the name of the sort group. This name must 

be the same as the name given in the sort group 
name statement you want. 

control-file-number, is the file number of the control file. A maximum 

of four digits can be used. 


control-file-name, (optional) is the name assigned to the control file. 

A maximum of 17 characters can be used. If the 
name is not used, the comma must still be 
entered. 


drive-number is the control file diskette drive number. The 

valid entries are 1, 2, 3, or 4. 

For our example, assume you created a control file on file 5 and that the file is 
called EXAMPLE. The file statement would be: 

— - - . . ■ " —. - . . ■ ' ■ Sort Group Name 

- File Number of the Control File 

- Name of the Control File 

I- Drive Number of the Control File 


FILE SALES,5,EXAMPLE,I 
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Sort Group Name Statement 

The sort group name statement is used only when the sort statements are read 
from a control file. The control file can contain several sets of sort statements. 

Each set of sort statements is identified and starts with a sort group name 
statement. All sort statements that follow the sort group name statement 
belong to that sort group. 

The sort group name statement has **(asterisks) in positions 1 and 2. The sort 
group name starts in position 3. The name can have up to 8 alphameric 
characters. The first character of the name must be alphabetic (A through Z). 

For our example, if we were to write the sort statements on the control file, 
the sort group name statements and the other sort statements would look like 
this: 

#*C0ST 

#S0RT THE COST FILE 
S 0 R T ° * O « '■> <:• O <> 

MASK -■ » » * » <> o <> 

SALES 

•kSORT CUSTOMER FILE BY TERRITORY, SALES REP AND YTD SAL 

S 0 R T 1, M A S T E R , 1., 1, S A L E S , 2 

MASK 5,2,A,15,5,A,7,8,0 

WORK 2,1 

#* PAYROLL 

PAY ROLL FILE IS SORTED FOR CHECK RUN 
S 0 R T ° ° <> <> <> •:> 

M A S K "■ « <» «• <> 

W 0 R K o <> <> '•> <> o 


The **SALES is the sort group name statement. 

Comment Statement 

The comment statement can be used only in a control file. Any number of 
comment statements may be used as long as the maximum number of 
statements for the sort group is not exceeded. The comment statements along 
with the other statements in the sort control group are displayed after being 
read from the control file. The comment statement can be used to identify the 
type of sort and the input and output files. It also can provide special 
information to the operator about the sort. The comment statement is not 
required. If used, it follows the sort group name statement and comes before 
the sort statement. 

The comment statement has an *(asterisk) in position 1. The remaining 63 
positions can be used for comments as in our example: 


*S0RT CUSTOMER FILE BY TERRITORY, 


SALES REP AND YTD SAL 
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SORT Statement 

The SORT statement is required. The SORT statement describes the data files 
used and the type of sort to be performed by the sort program. The command 
syntax is: 

SORT input-number, [input-name], input-drive, output-number, 

[output-name], output-drive [,sort-type] 

where: 


input-number, 

input-name, 

input-drive, 

output-number, 

output-name, 

output-drive, 

sort-type 


is the file number of the input file. A maximum 
of four digits can be used (0001 -9999). 

(optional) is the name assigned to the input file. 

A maximum of 17 characters can be used. If the 
name is not used, a comma must still be entered. 

is the input file diskette drive number. The valid 
entries are 1, 2, 3, or 4. 

is the file number of the output file. A maximum 
of four digits can be used (0001-9999). 

(optional) is the name to be assigned to the 
output file. A maximum of 17 characters can be 
used. If the name is not used, a comma must 
still be entered and the name that exists on the 
diskette will be used. 

is the output file diskette drive number. The valid 
entries are 1, 2, 3, or 4. 

(optional) leave blank for a standard sort (the 
complete record is sorted), enter an A for 
address out sort. 


In our example, the SORT statement looks like this: 


S 0 R T 11 M A S T E R , 1 .• :!. * S A I... E 8,2 


Input File Number 
Input File Name 
Input File Drive Number 
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MASK Statement 

The MASK statement is required and follows the SORT statement. The MASK 
statement specifies the sort fields. A maximum of six sort fields can be 
specified. The sum of the lengths of the sort fields (MASK length) must not 
exceed 64 positions. Field 1 (first field you specify) is the sort field that plays 
the largest role in determining the order of the sort. Each additional field you 
specify plays a smaller role in determining the final order of the sorted record. 
The command syntax is: 

MA£>K field-1-starting-position-number, field-1-length, 

type[.] 

where: 


field-1 -starting 
- position - number, 


is the leftmost location of the sort field. A 
maximum of four digits can be used. 


field-1 - length. 


type. 


is the length of the sort field. A maximum of two 
digits can be used. When BASIC internal 
numeric data is sorted, the valid length entries 
are 4 (short precision) or 8 (long precision). 

identifies the type of data and specifies the sort 
sequence for the field. The valid entries are: 


Type Of Data 

Entry Ascending 

Entry 

Descending 

Example BASIC 

Form Statement to 

Create This Data 

Character 

A 

D 

FORM C9 

Floating point 
(internal numeric) 

F 

G 

FORM S (short precision) 
FORM L (long precision) 

Signed character 

N 

0 

FORM PIC (-ZZZZ M) 

Zoned decimal 
(numeric character) 

Z 

Y 

FORM NC5 

Packed decimal 

P 

Q 

FORM PD7 

binary (2-, 4-, 
8-byte) 

B 

C 

FORM B2 ] 

FORM B4 l (only one n 
FORM B8 J 
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Character data is written by an APL program and by a BASIC program when a 
character variable or character constant is specified for output. The FORM 
statement in BASIC can also be used to change numeric data into character 
data. BASIC internal numeric (floating point) data is written when a numeric 
variable in BASIC is specified for output. Sign character data is written when 
PIC is used in the FORM statement in BASIC. 

When signed character (entry N or 0) data is sorted, the following conditions 
must be met: 

• A sign must be in the leftmost position of the field. 

• A blank in the leftmost position of the field is the same as a plus sign. 

• The digits must be right-justified in the field. 

• The complete field must be used as a sort field. 

• Leading blanks are the same as zeros. 

• Characters such as $ and . can appear in the field as long as they always 
appear in the same position. 

For more information on the types of data, see the APL or BASIC reference 
manual listed in the preface. 

In our example, the MASK statement looked like this: 



Starting Location of High-Order Sort Field (sales territory) 
Length of Sort Field 
Characters in Ascending Order 

Starting Location of the Sort Field (sales representative) 
Length of Sort Field 
Characters in Ascending Order 

Starting Location of the Low-Order Sort Field (YTD sales) 

Length of Sort Field 

Signed Character in Descending Order 


MASK 5,2,A,15,5,A,7,8,0 
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ALTS Statement 

The ALTS statement is used when you want to alter the collating sequence 
used by the sort program. The collating sequence is restored to the original 
sequence when the next SORT statement is read. Note: The ALTS statement 
should only be used with the character sorts. 

The collating sequence used by the sort is shown in the chart. The command 
syntax is: 

ALTS new-location original-location [,...] 
where: 


new-location is the hexadecimal number from the entry column 

of the chart for the new location of the character 
you want to change. 

original -location is the hexadecimal number from the entry column 

of the chart of the character you want to move. 
Note that a comma can be used after the last entry but that it is not required. 

For example, if you want the numbers to sort before the alphabetic characters, 
the ALTS statement would be: 

ALTS 30F0.31 F1.32F2.39F9 

When a character is moved into a sequence position normally assigned to 
another, both the new and the original character will occupy the same position 
in the sequence and will be considered equal. If the two characters are not to 
be equal, the character that normally occupies that position must also be 
moved. 
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Entry 

Graphic 


Entry 

Graphic 


Entry 

Graphic 


Entry 

Graphic 


Entry 

Graphic 


0 0 



34 



68 

Y 


9C 



DO 

> 


01 



35 



69 

7 

4 .. 


9D 

O 


D1 

J 


02 



36 



6A 

T 

t 


9E 



D2 

K 


03 



37 



6B 

; 


9F 

<- 


D3 

L 


04 



38 



6C 

% 


A0 

"* 


D4 

M 


05 



39 



6D 



A1 



D5 

N 


06 



3 A 



6E 



A2 

S 


D6 

0 


0 7 



3D 



6F 

? 


A3 

t 


D 7 

P 


08 



3C 



7 0 

& 


A 4 

u 


D8 

Q 


09 



3D 



71 

A 


A 5 

V 


D9 

R 


0A 



3E 



72 



A 6 

w 


DA 

:c 


OK 



3F 



73 

A 


A 7 

X 


DB 

t 


DC 



4 0 



74 



A 8 

y 


DC 

9 


0 n 



41 

A 


75 

ID 


A 9 

7 


DD 

6 


OE 



42 

B 


7 6 



A A 

0 


dp: 

n 


OF 



43 

C 


77 



AB 

u 


DF 

0 


10 



44 

D 


78 

V 


AC 

. 1 . 


E0 

\ 


.1.1 



45 

E 


79 



AD 

f: 


El 



12 



46 

F 


7 A 

; 


AE 



E2 

8 


13 



47 

G 


7B 

4 


AF 

<> 


E 3 

T 


.1.4 



48 

H 


7 C 

A 


B0 

(X 


E 4 

U 


15 



49 

1 


7 D 

1 


B1 



E5 

V 


16 



4 A 

6 


7E 

:::: 


B 2 

\ 


E6 

U 


17 



4B 

, 


7 F 

* ' 


B3 

A 


E 7 

X 


18 



4 C 



8 0 



B4 

<■) 


E8 

Y 


19 



4 D 

( 


81 



B5 



E9 

*7 

A.. 


1A 



4 If 

•f 


82 

b 


B 6 

X 


EA 

/ 


IB 



4 F 

l 


83 

c: 


B 7 

\ 


EB 

\ 


1 c: 



5 0 

8< 


84 

d 


B 8 



EC 

if 


ID 



51 

J 


85 

<•■ 


B 9 



ED 

0 


1E 



52 

l< 


86 

f 


BA 

V 


EE 

l-f 


IF 



53 

L 


87 

q 


BB 

A 


EF 

f 


2 0 



5 4 

M 


88 

h 


BC 

T 


F 0 

0 


21 



5 5 

N 


89 

i 


BD 

::i 


F1 

1 


9 ':> 



56 

0 


8 A 

t 


BE 

'/■ 


F 2 

2 


2 3 



57 

P 


8B 



BE 

i 


F 3 

3 


24 



58 

Q 


8 C 

J: 


C 0 

•( 


I- 4 

4 


25 



59 

R 


8 D 

1" 


C1 

A 


F 5 

5 


26 



5 A 

! 


8E 

1 


02 

B 


F6 

6 


27 



5B 

$ 


8F 

-t 


C 3 

C 


F 7 

7 


28 



5 c: 

w 


9 0 

0 


C4 

D 


F8 

8 


29 



5D 

) 


91 

j 


C5 

E 


F9 

9 


2 A 



5E 



92 

k 


C 6 

F 


FA 

1 


2B 



5F 

- 


93 

l 


C7 

G 


FB 

/V 

V 


2C 



6 0 

- 


94 

m 


C8 

H 


FC 



2D 



61 

/ 

/ 


95 

n 


C9 

:i: 


FD 

0 


2E 



62 

8 


96 

0 


CA 

/V 

A 


FE 

.♦. 


2F 



63 

T 


97 

P 


CB 

/■/ 

V 


FF 

1 


3 0 



64 

U 


98 

q 


CC 

l/' 





31. 



65 

V 


99 

V 


CD 

(D 





32 



66 

u 


9 A 



CE 

V 





33 



67 

X 


9B 



CF 

(it 






Note: The EBCDIC graphics are shown in this chart. See the appropriate language reference manual for 
the graphics displayed for other national character sets. Graphics are assigned to all blank positions (except 
hex 40) for maintenance purposes. These graphics are incompatible with other systems and cannot be used 
for exchange purposes. These graphics may be removed or changed as a result of maintenance or new 
versions of this product. 
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WORK Statement 

The WORK statement follows the ALTS statement. The WORK statement 
identifies the work file if one is required. The command syntax is: 

WORK file-number, drive-number 
where: 


file-number, is the file number of the work file. A maximum 

of four digits can be used. 

drive-number is the work file diskette drive number. The valid 

entries are 1, 2, 3, or 4. 

In our example, the WORK statement looked like this: 


In our example, we have a 16K system with a 128-byte sector work file 
diskette. There are 1000 records in the file. Each record has 15 positions in 
the control field. Now, based on the table in Appendix A, the work file should 
be at least a 46K file. When using the chart for this example you must use a 
16-position control field because the chart does not have an entry for a 
15-position field. 
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OPERATION 

The )SORT (for APL) or UTIL SORT (for BASIC) command is used to activate 
the sort program. The sort program then determines the source of the sort 
statements by displaying the following: 


C 0 N T R 0 L G R 0 U P 8 T A T E M E N T IN P U T 
OPTIONS ARE: 

1 . C 0 N T R 0 L FIL E 0 N D181< E T T E 

2. KEYBOARD ENTRY 

3, STOP 

E N T E R 0 P T10 N N U h B E R .• P R E 8 8 E X E C U T E 


When sort statements are entered from the keyboard, the sort program 
displays the sort statement keyword on the input line. The cursor is then 
positioned to enter the first parameter. Anytime the sort program is requesting 
input from the keyboard you can enter STOP. STOP must appear in the first 
four positions of the input line. When STOP is entered, you can restart the 
sort or return to the language. 


Control File 

Entering a 1 in response to the first display means that the sort statements are 
located on the control file. The following is then displayed: 


ENTER FILE STATEMENT 

SORT GROUP NAME, 

0 0 N T R 0 L FIL E N U M B E R , 
CONTROL FILE NAME, 
DRIVE NUMBER 

OR ENTER STOP 

AND THEN PRESS EXECUTE 


FILE .... 


After the information for the FILE statement is entered, the control group is 
read. A message to mount the sort files is then displayed: 

MOUNT SORT FILES, 

AND THEN PRESS EXECUTE 
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After the sort files are mounted and the EXECUTE key is pressed, the sort 
statements are read and displayed. 

The sort program also checks the sort statements for errors. If any errors are 
found, you will be allowed to correct them. However, these corrections are not 
saved on the control group file. Only 12 statements can be displayed at a 
time. When the sort control group contains more than 12 statements, press 
the EXECUTE key to display the additional statements. After all sort 
statements have been displayed and corrections have been made, press the 
EXECUTE key to begin the sort or enter STOP to end the sort. 


Keyboard Entry 

Entering a 2 in response to the control group statement input display means 
that the sort statements are entered from the keyboard. A message to remind 
you to mount the sort file is displayed. After the sort files have been mounted 
and the EXECUTE key is pressed, the following is displayed: 

ENTER SORT STATEMENT 


INPUT NUMBER, 

INPUT NAME, 

INPUT DRIVE, 

OUTPUT NUMBER, 

OUTPUT NAME, 

OUTPUT DRIVE, 

SORT TYPE 

OR ENTER STOP 

AND THEN PRESS EXECUTE 


SORT 


After the parameters for the SORT statement have been entered and the 
EXECUTE key is pressed, the following is displayed: 

ENTER MASK STATEMENT 


FIELD 

1 STARTING 

POSITION 

NUMBER, 




FIELD 

i LENGTH, 






TYPE 1 

(A, D, N, 

0, F, G, 

Z, Y, P, 

Q, B 

i, OR 

C) 

FIELD 

2 STARTING 

POSITION 

NUMBER, 




FIELD 

2 LENGTH, 






TYPE 2 

(A, D, N, 

0, F, G, 

Z, Y, P, 

Q, B 

, OR 

C) 


UP TO 6 FIELDS 

OR ENTER STOP 

AND THEN PRESS EXECUTE 


MASK 
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After the parameters for the MASK statement have been entered and the 
EXECUTE key is pressed, the following is displayed: 


PRESS EXECUTE TO USE THE STANDARD COLLATING SEQUENCE> 
0 R E N T E R A L T E R N A T E C OL L A TIN 0 S E Q U E N C E S T A T E M E N T (S v - 

NEW-LOCATION 1 ORIGINAL-LOCATION 1, 

N E W -■ L 0 C A T10 N 2 0 RIGIN A L - L 0 C A T 10 N 2 , 

ENTER AS MANY PAIRS AS NEEDED 

OR ENTER STOP 

AND THEN PRESS EXECUTE 


ALTS 


If you do not want to change the collating sequence, just press the EXECUTE 
key. 

To change the collating sequence, enter hexadecimal numbers that represent 
the changes, then press the EXECUTE key. From one to 12 changes can be 
entered on a single line. The same message will be displayed again to allow 
you to make additional changes. After you have made all your collating 
sequence changes, press the EXECUTE key. 

The following is then displayed: 

PRESS EXECUTE TO DO THE SORT, 

OR ENTER A WORK STATEMENT 

FILE NUMBER, 

DRIVE NUMBER 

OR ENTER STOP 

AND THEN PRESS EXECUTE 


WORK 


If a work file is not needed, just press the EXECUTE key. If you need a work 
file, enter the file number and diskette drive number before you press the 
EXECUTE key. The sort begins after the EXECUTE key is pressed. 

If the sort program determines that a work file is needed and one was not 
specified, error 337 occurs. The previous message requesting a work 
statement is displayed along with the 337 error code. You can then enter a 
work statement and continue the sort. 
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Stop 


Entering a 3 in response to the control group statement input display ends the 
sort program. The sort program is also ended when STOP is entered in 
positions 1 through 4 anytime the program is expecting input from the 
keyboard. When the sort program ends, the following is displayed: 


SORT COMPLETED. 

OPTIONS ARE: 

1. EXECUTE SORT AGAIN 

2. RETURN TO APL OR BASIC 

E N T E R 0 P T10 N N U M B E R, P R E S S E X E C U T E 


This message can be displayed when error 325, 326, 338, or 340 occurs or 
when any diskette error occurs during the sort. Therefore, check to make sure 
an error code is not displayed with this message. 

If a work file was used during the sort, the amount of the work file storage 
used is shown in this display also. 


Procedure File 

The sort program can be executed by statements in the procedure file. The 
)PROC (APL) or PROC (BASIC) command is used to activate the procedure file. 
The procedure file must contain the )SORT (APL) or UTIL SORT (BASIC) 
statement and the FILE statement for each file you want to sort. The control, 
input, output, and work (if one is required) files must all be online before the 
procedure file is executed. All operator responses are bypassed unless an error 
is found. Except for error 337, errors cause the sort to return to the manual 
method of operation, and the procedure file operation is terminated. If error 
337 is the only error encountered, the procedure file will continue when SORT 
completes. The BASIC system device is not changed by the sort program. 
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Following is a sample SORT program executed in an APL procedure file: 


)LOAD 11002 
PGM 1 
> SORT 

FILE BALES,5 
} LOAD 1:1.0 03 
PGM 2 


EXAMPLE,1 


The equivalent procedure file for BASIC is as follows: 


UTIL SYS DBG 

LOAD 2 

RIJN 

UTIL SORT 

FILE BALES,5,EXAMPLE,1 

LOAD 3 

RUN 


The procedure file is accessed when you enter a PROC command. A PROC 
command instructs the system to begin using the procedure file in the 
indicated file, as shown below: 

PROC 'I, DBG 


The system then loads file 4 and begins executing the lines in the file, one 
record at a time. 


Hints 

• File names may be either simple or complex. The names SYSAREA and 
ERRORSET cannot be used. 

• The work and output files must be marked and unused. 

• The control file must be a record I/O file with blocked-spanned records. 
The record length must be 64. 

• When the input file contains records with equal values in the control field, 
these records in the output file may not be in the same order as they were 
in the input file. 
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ADDITIONAL INFORMATION 

Performance Considerations 

The following conditions can lessen the time required to perform sort: 

• Having fewer records to sort 

• Having a smaller control field 

• Having a smaller logical record size 

• Having a blocked-spanned input file 

• Having the input, output, and work files on different diskettes 

• Not using an alternate collating sequence 

• Using the address out sort 

Work File Storage Requirements 

The following APL and BASIC programs will determine the size of your work 
file if one is needed. 


Diskette 

Format 

1 

2 

3 

4 

5 

6 

7 

8 


Maximum 
File Size 

240K 
277K 
296K 
481K 
555K 
592K 
962K 
1,110K 


For information about format, refer to Chapter 3, Diskette Initialization. 
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APL Program 



VWORKFI lei: 13 3 V 

V WORK FILE; K ; U; M; C; S; R; A; B; K1.; T; G; I; 1 1 

n. :i 

'ENTER MACHINE SIZE IN 

tt OF l< ' 


1013 


i:: 3 ::i 

'ENTER WORK FILE SECTOR SIZE IN # OF 

143 

UH3 


i: 5 ::i 

‘ENTER MASK LENGTH IN 4 OF BYTES' 

C63 

MH'I 



'ENTER 4 OF RECORDS IN 

INPUT FILE’ 

c: b ::i 

R*I3 



Olt < (K< 1.6 32 48 64)/ 

550 1.650 2595 

t: i o :i 

Z*Q 


i: :l i ::i 

LO : 


Cl 2 3 

so; 


i: :t 3 ::i 

LI. : 


nm-::i 

CKOl 


i: i5:\ 

T<- t.2®C 


i: . 1 . 6:1 

-KT < 1.6)/L2 


i: 173 

016 


i:ib:i 

L2: 


Cl 9 3 

A< 2 x < " 1 T 2 >< 2 -X- T ) 


c: 2 o ::i 

l< 1 «-7+< A+Cx (M+7) ) •:•• 1024 


1:21 :i 

-><K1>K )/L3 


1" "i 

■■>(C>R)/L4 


C23 3 

•H.,1 


1:24 ::i 

L3 : 


C233 



C263 

( B■■■■■■■ S) /L5 


C27 3 

T>|..W*M+4 


C283 

G«-TB*T 


C293 

1>1..11. R-vB 


C30 3 

L<-l + (UxGxl >*1024 


i:3.1.3 

SO R-Bxl 


C 3 2 3 

S2<“ r si T 


r.333 

7.A- r L+<82.xU>* 10 24 


L 3*1 3 

Z<-< l + *2> 11 )xZ 


i:35 3 

L4: 


i::3 6 3 

MACHINE SIZE 

' iK 

C 3 7 3 

'WORK FILE SECTOR SIZE 

1 ;w 

i:3 8 3 

MASK LENGTH 

■ ;m 

1:393 

n OF RECORDS 

' ; R 

I' l O 3 

WORK FILE SIZE 

'; z 

i:413 

■+0 


1.423 

L5: 


C433 

(>|..CxO . 9 


i:.443 

■n, 0 



V 


80 











BASIC Program 

0010 PRINT ‘ENTER MACHINE SIZE IN # OF K* 

0020 INPUT K 

0030 PRINT ‘ENTER WORK FILE SECTOR SIZE IN # OF BYTES' 
0040 INPUT W 

0050 PRINT ‘ENTER MASK LENGTH IN tt OF BYTES* 

0060 INPUT M 

0070 PRINT ‘ENTER ft OF RECORDS IN INPUT FILE* 

0080 INPUT R 

0090 IF l<< 16 GOTO 500 

0100 IF K<32 GOTO 520 

0110 IF K<UB GOTO 540 

0120 Z=Q 

0130 C*3855 

0140 S«C 

0150 C*C+1 

0160 T=211NT(LTW(C) +1E-10) 

0170 IF T<16 GOTO 190 
0180 T16 

0190 A«2*<2*T-1+T) 

020 0 K 1«7+ ( < A+ < Cm- < M+7) ) ) /1024) 


0210 

IF K1>K GOTO 

240 


0220 

IF C>R GOTO 

420 


0230 

GOTO 150 



0240 

B-C--1 



0250 

IF B :: "S GOTO 

480 


0260 

T=INT<W/<M+4>> 


0270 

G*B/T 



0280 

IF 0=1 NT<G) 

GOTO 300 


0290 

G«INT(G+1) 



030 0 

I1«R/B 



0310 

I»INT<I1) 



0320 

L«< <W*G*I>/1 024) + 1 


0330 

S1« R~ (B *» I) 



0340 

S2=S1/T 



0350 

IF S2*INT(S2) GOTO 370 


0360 

S2«INT(S2+1) 



037 0 

Za(S2*U)/1024+L 


0380 

IF Z«INT<Z> 

GOTO 400 


0390 

Z=INT(Z+1) 



040 0 

IF 11<2 GOTO 

420 


0410 

Z=Z*2 



0420 

PRINT ’ 

MACHINE SIZE: 

‘ ,K 

0430 

PRINT ‘WORK 

FILE SECTOR SIZE: 

’ , W 

044 0 

PRINT ’ 

MASK LENGTH: 

’ , M 

0450 

PRINT ’ 

tt OF RECORDS 

* , R 

0460 

PRINT ‘ 

WORK FILE SIZE: 

‘ ,Z 

0470 

STOP 



0480 

C=INT(C#.9) 



0490 

GOTO 140 



050 0 

0550 



0510 

GOTO 140 



0520 

0=1650 



0530 

GOTO 140 



0540 

0=2595 



0550 

GOTO 140 
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Appendix A: Sort Work File Size Charts 


The number within the charts are the K-byte size of the work file. The numbers on the 
extreme right side of the chart are diskette format numbers. The lines in the chart show 
the maximum capacities at which that format diskette can be used. A zero entry in the 
chart means that a work file is not needed. 


SYSTEM SIZE® 16K 

WORK FILE SECTOR SIZE® 128 


MASK LENGTH 

RECORDS 4 8 12 .1.6 20 24 28 32 36 40 44 48 52 56 60 64 


t;. ^ u i\ ju v 

250 

3 T 

0 

U 

0 

4* aL 

0 

. 1 . K.J 

0 

Am V 

0 

Aw T 

0 

Aw w 

9 

W Aw 

12 

\./ w 

12 

T W 

17 

17 

17 

W Am 

17 

17 

17 

33 

500 

0 

0 

9 

12 

14 

17 

34 

44 

44 

66 

66 

66 

66 

66 

66 

128 

750 

7 

11 

13 

34 

40 

50 

50 

66 

66 

96 

96 

96 

98 

98 

98 

190 

1000 

: - 9 

14 

34 

46 

54 

66 

66 

86 

86 

128 

128 

128 

128 

128 

128 

252 

1500 

26 

40 

50 

66 

78 

98 

96 

128 

130 

190 

190 

190 

192 

192 

192 

378 

2000 

34 

54 

66 

88 

104 

128 

128 

170 

172 

aLvIaL 

: 

• ■ jjjij*: %*JrA im 

252 

254 

254 

254" 


2500 

M-2 

66 

82 

108 

130 

160 

160 

*310 

Am *!• Am 

214 

316 

316 

316 

318 

318 

318 


3000 

50 

80 

98 

130 

154 

192 

190 

252 

256 

378 

378 

378 

380 

380 

380 ! 


350 0 

58 

92 

112 

150 

180 

222 

9 ':> 6 

Aw A»» An 

294 

298 

440 

440 

440 

L|.L|.L|. 

444 

I+I.|.L|. 


5000 

82 

130 

160 

2141256 

5 16 

316 

42JL 

lilli 








7500 

122 

194 

238 | 

320 

382 

474 

472 

r 









10000 

160 

WMBT 

. fil-wCr 

316 

426 \ 

1 












15000 

240 

384 

474 f 














20000 

318 
















30000 

476 
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system size* i6K 

WORK FILE SECTOR SIZE™ 256 


MASK LENGTH 


RECORDS 4 

8 

12 

16 

20 

24 

28 

-jr ':> 

**•* A«i 

36 

40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

9 

1 0 

12 

14 

14 

17 

17 

17 

17 

o 

50 0 

0 

0 

9 

12 

ii+ 

16 

34 

38 

44 

54 

52 

66 

66 

66 

66 

86 

750 

0 

11 

13 

34 

42 

4 6 

50 

56 

6 6 

78 

78 

98 

98 

98 

98 

128 

1 0 0 0 

9 

14 

34 

46 

54 

60 

66 

74 

86 

104 

102 

.130 

128 

130 

130 

170 

150 0 

20 

4 0 

50 

66 

00 

88 

96 

11 0 

130 

154 

152 

192 

192 

.194 

194 

252 

2000 

36 

52 

66 

88 

106 

116 

128 

148 

172 

204 

202 

256 

254 

nco 'IKQ PfWT 

> Vht CJ | *itJ 

250 0 

44 

64 

02 

100 

132 

146 

16 0 

184 

214 

254 

'!> is; ';> 

A.. W A.. 

[320 

318 

322 

■xoo 

V/ A.. A.. 

420 

3000 

52 

76 

98 

130 

156 

174 

190 

220 

256 1304 302 

382 

380 

386 

386 

502 

3 5 0 u 

60 

00 

112 

150 

182 

202 

222 

256 

|298 

354 

352 

4 4 6 


450 

450 

586 

50 0 0 

84 

126 

160 

214 

260 

288 

[§f<r 

364 

424 

506 

502 1636 632 

642 


”536 

750 0 

124 

106 

238 

[320" 

388 

430 

472 

544 

j 6 3 4 

756 

752 

952 

946 

960 

962 


10 0 0 0 

164 

2481316 

426 

516 

574 

f628~ 

724 

844 1 

| 







15000 

2 4 6 [ 

370 

474 

636 

772 

858 

9401084 

r~ 








20000 

326 4921630 














3000 0 

400 

736 

944 














'•10 0 00 

648 9821 















50 0 0 0 

01 0 

















SYSTEM SIZE* 16K 
WORK FILE SECTOR S 

RECORDS 4 8 12 

ra;> 

16 

512 

20 

24 

’ 

28 

MASK 

32 

LENGTH 
36 40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

10 

10 

12 

13 

14 

16 

16 

18 

18 

19 

50 0 

0 

0 

10 

12 

14 

16 

36 

38 

44 

48 

52 

60 

60 

68 

68 

74 

750 

8 

1 1 

13 

34 

4 0 

46 

52 

56 

66 

72 

78 

88 

90 

102 

102 

110 

10 0 0 

10 

14 

36 

44 

52 

60 

68 

74 

86 

96 

102 

116 

118 

134 

134 

146 

150 0 

28 

40 

52 

66 

76 

88 

100 

1 J. 0 

13 0 

142 

152 

174 

176 

20 0 

20 0 

218 

20 0 0 

36 

54 

68 

86 

102 

116 

132 

148 

172 

188 

202 

230 

234 

266 

266 

288 a 

250 0 

44 

66 

84 

108 

126 

146 

164 

184 

214 

234 

252 

288 

292 1 

[332 

332 

360 

30 0 0 

54 

78 

100 

130 

1 

«&< W Am 

174 

196 

O'? ft 

Am Am W 

256 2801302 

344 

350 

396 

398 

432 

350 0 

62 

92 

116 

150 

176 

202 

228 

256 | 

| 298 

326 

352 

402 

408 

462 

464 

502 e 

b U 0 0 

88 

130 

166 

2,1,4 

-2511. 

2881326 364 

424 

464 

502 

572 

582 660 662 718 

750 0 

130 

194 

246 

J 320 

374 

430 

486 

544 

[634“ 

696 

752 

858 

870 

988 

9921074s 

10 0 0 0 

172 

2561328 

426 

500 5741648 724 

844 

92610021 





150 0 0 

mm 

I 384 

490 

636 

748 

858 

9701084 I 

1— 








20000 

340 

512 1654 

848 996| 












30 0 00 

510 

766 

980 

j 













40 000 

| 68O1020| 















50 0 0 0 

848 
















60000 

Ml 

















84 



SYSTEM SIZE-" 32K 

WORK FILE SECTOR SIZE^ 128 


MASK LENGTH 


RECORDS 4- 

8 

12 

16 

20 

24 

28 

"lO 

W Am 

36 

40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

500 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

33 

33 

. ••#!** 
OO 

33 


AU 

750 

0 

0 

0 

0 

0 

0 

25 

33 

33 

48 

48 

48 

48 

48 

96 

190 

1000 

0 

0 

0 

0 

27 

33 

33 

43 

43 

64 

128 

128 

128 

128 

128 

■“55551 

1500 

0 

20 

At. W 

33 

39 

48 

96 

128 

128 

190 

190 

190 

190 

190 

190 

378 

2000 

1? 

27 

33 

4*3 

104 

128 

128 

170 

170 

254 

"254" 

■sip 

& 

TRET 

"254" 



250 0 

21 

33 

82 

108 

128 

160 

160 

'?i O 

Am J. Am 

212 

316 

316 

316 

316 

31.6 

316 


3000 

25 

78 

98 

128 

154 

190 

190 

■555" 

"53it 

378 

378 

378 

378 

378 

378 


350 0 

99 

Ait / 

90 

112 

150 

178 

2 22 

9 9 9 

At. Am Am 

294 

296 

442 

442 

44 0 

440 

442 

440 


5000 

82 

128 

160 

212 254 

"ifr 

jlfli 

420 

4221 








750 0 

120 

192 

238 [ 

316 

380 

4721 











10000 

160 

■ 554 “ 

ITT 

4aof 













15000 

24-0 

380 

474 | 













20000 

IF 
















30000 

476 

















SYSTEM SIZE- 32K 

WORK FILE SECTOR SIZE- 256 

MASK LENGTH 


RECORDS 4 

8 

12 

16 

20 

24 

28 

32 

36 

40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

500 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

27.' 

- mm 

33 

33 

33 

43 

750 

0 

0 

0 

0 

0 

0 

25 

28 

33 

39 

39 

48 

48 

49 

98 

128 

1000 

0 

0 

0 

0 

27 

29 

33 

37 

43 

52 

104 

128 

128 

128 

128 

170 

150 0 

0 

20 

aSm w 

33 

39 

43 

96 

110 

128 

154 

154 

192 

190 

192 

192 

9 c ; 9 

Am W Am 

2000 

17 

26 

33 

43 

104 

114 

128 

Hill 

170 

204 

204 

254 

252 

254 

254 

[isir 

250 0 

21 

31 

82 

108 

128 

142 

160 

184 

919 

254 

254 1 

[316“ 

316 

318 

316 

420 

3000 

25 

76 

98 

128 

154 

170 

190 

218 

256 

(OTT 

-JUT 

380 

378 

380 

380 

502 

3500 

29 

88 

112 

150 

180 

198 

999 

Am Am Am 

256 

[298“ 

356 

356 

442 

440 

444 

442 

(586 

5000 

82 

124 

160 

zn 

256 

H§F 

316 

2564 

424 

506 

306| 

[630 

628 

TST 

TTT 


7500 

1 99 

A Am Am 

184 

238 

1318 

382 

|j.99 

1 Am Am 

472 

544 

|634 

758 

758 

944 

940 

948 

946[ 


10000 

162 

2441316 

J424 

508 

(562 

628 

724 

844 | 








15000 

?40| 

364 

474 

[634“ 

760 

842 

940 | 

1 









20000 

320 

4841632 

844 

1 











30 0 00 

480 | 

726 

9461 












40000 

638 
















500 0 0 

796 
















60000 

956 
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SYSTEM SIZE- 32K 

WORK FILE SECTOR SIZE= 512 


MASK LENGTH 


RECORDS '+ 

8 

12 

16 

20 

24 

28 

„„ 0 
W Ah 

36 

40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

50 0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

99 

» 

29 

30 

33 

33 

38 

750 

0 

0 

0 

0 

0 

0 

9 n:; 

A** V»* 

':>9 

33 

36 

39 

43 

44 

49 

98 

112 

10 0 0 

0 

0 

0 

0 

26 

30 

33 

38 

43 

47 

104 

114 

116 

128 

128 

148 

150 0 

0 

20 

25 

32 

37 

44 

96 

112 

128 

140 

156 

170 

172 

192 

192 

220 

2000 

17 

26 

33 

42 

100 

116 

128 

148 

170 

186 

206 

226 

228 

254 

254 

292 

250 0 

21 

32 

82 

104 

124 

144 

160 

186 

9i 9 

2 3 2 

258 

9 o n 

Ah U A.. 

286| 

| 318 

316 

366 

3000 

9S 

76 

98 

124 

148 

172 

190 

220 

256 

278! 308 

338 

342 

380 

380 

438 

350 0 

29 

88 

114 

144 

172 

200 

2 2 2 

2581 

| 298 

324 

360 

394 

398 

M-44 

442 

510 

5000 

82 

124 

162 

204 

244 

286] 

| 316 

368 

424 

462 

512 

564 

5681 632 

632" 

728 

750 0 

j oo 

186 

242 

| 304 

364 

428 

472 

55 0| 

| 634 

692 

766 

844 

850 

948 

9461090 

10 0 0 0 

162 

246 f 320 

404 

484 

5701 

628 

732 

844 

92210201 






150 0 0 

24 Of 

370 

4801 604 

726 

852 

9401096 








20000 

1 320 4901640 

804 

966 [ 












300 00 

4801 

736 

958 

1 













M 00 0 0 

1 638 

980 f 















50000 

796r 
















60000 

956] 

















SYSTEM SIZE- ! 48K 

WORK FILE SECTOR SIZE* 128 


MASK LENGTH 


RECORDS 4 

8 

12 

16 

20 

24 

28 

32 

36 

40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

50 0 

0 

0 

0 

0 

0 

0 

0 

0 


0 

0 

0 

0 


0 

0 

750 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

48 

48 

48 

48 

95 

1000 

0 

0 

0 

0 

0 

0 

0 

0 

43 

64 

64 

64 

64 

64 

64 

126 i 

150 0 

0 

0 

0 

0 

39 

48 

48 

64 

64 

95 

95 

190 

190 

190 

190 

378 4 

2000 

0 

0 

33 

43 

so 

64 

64 

85 

170 

254 

252 

254 

252 

254 

254 


250 0 

0 

33 

41 

54 

64 

160 

160 

21 2 

21 ' :> 

316 

316 

316 

316 

316 

316 


3000 

0 

39 

48 

64 

154 

190 

190 

252 

254 

378 

378 

378 

378 

378 

378 


350 0 

S 29 

45 

56 

150 

178 

9 9 9 

99 9 

294 

296 

44 0 

44 0 

440 

440 

442 

442 


5000 

41 

128 

160 

91 oj 

254 

316 

316 

420 

420! 







750 0 

1 120 

192 

238f 

316 

378 

472 

472 

| 









10000 

[ 160 

1 254 

316 

4201 












150 0 0 

[ 238 

380 

474 [ 














200001 

1 316 
















30000 472 
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SYSTEM SIZE® 4-8K 

WORK FILE SECTOR SIZE® 256 


MASK LENGTH 


RECORDS 

4- 

8 

12 

16 

20 

24 

28 

32 

36 

4 0 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

50 0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

750 

0 

0 

0 

0 

0 

0 

0 

0 

0 

Q 

0 

49 

48 

49 

48 

64 

1000 

0 

0 

0 

0 

0 

0 

0 

0 

43 

52 

52 

64 

64 

64 

64 

85 

150 0 

0 

0 

0 

0 

39 

43 

49 

55 

64 

77 

77 

192 

190 

192 

190 

254 

2000 

0 

0 

33 

43 

'' EJO 

w 9m 

57 

64 

73 

170 

204 

204 

254 

252 

48* 45*. 

254 

254 

338 

250 0 

0 

31 

41 

54 

64 

142 

160 

182 

O 1 o 

Am J. Am 

254 

254 

316 

316 | 

[316 

316 

420 

30 0 0 

0 

37 

48 

64 

154 

170 

192 

218 

254)304 304 

380 

378 

380 

378 

504 

350 0 

29 

43 

56 

150 

178 

198 

222 

254 1 

[296 

354 

354 

442 

44 0 

442 

442 

1588 

50 0 0 

41 

122 

160 

212 

254 [282 316 

TiSJF 

420 

504 

5041630 

628 

630 

628 

838 

750 0 

120 

182 

238 1 

318 

380 

420 

474 

542 

[630 

754 

756 

944 

940 

944 

942.| 


1 0 0 0 0 

1160 242 1316 422 

506 |B6F 

632 

722 

838f 








150 0 0 

238 362 

474 

632 

756 

838 

946f 










20000 

316 482 630 

842[ 













3000 0 

4721722 

94 4 J 














'•1000 0 

628 

962f 















50000 

784 
















60 000 

942, 

















SYSTEM SIZE® 48K 


WORK FILE SECTOR SIZE® 

RECORDS 4 8 12 16 

512 

20 

24 

MASK 

r ) P ~Z'? 

A«* w %•» Am 

LENGTH 

36 40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

50 0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

750 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

43 

44 

49 

49 

55 

1000 

0 

0 

0 

0 

0 

0 

0 

0 

43 

47 

52 

57 

57 

64 

64 

73 

150 0 

0 

0 

0 

0 

37 

43 

49 

56 

64 

70 

77 

170 

172 

192 

192 

218 

20 0 0 

1 0 

0 

33 

42 

49 

57 

64 

73 

170 

186 

204 

226 

226 

256254 

290 3 

250 0 

0 

31 

41 

n 

W A,. 

61 

142 

160 

184 

212 

n n 

Am V•• Am 

256 

282 

284 [ 

318 

318 

362 

3000 

0 

37 

49 

62 

146 

170 

192 

220 

254 278(306 338 

340 

ion 

wr 

382 

436 

350 0 

po 

A** • 

43 

57 

144 

170 

198 

22^ 

256 

2.96 | 

324 

356 

394 

396 

4 4 4 

444 

508 e 

5000 

| 41 

122 

160 

204 

242 

282J316 364 422 

462 

508 

562 

564]634 632 722 

750 0 

[120 

182 

240 f 

304 

362 

420 

474 

546j 

634 

692 

760 

84 0 

846 

950 

9481084 s 

10000 

160 

2421320 404 

480 

5601632 726 842 

922101231 





15000 

238 

|362 

476 

604 

720 

838 946110881 









20000 

316 482 |636 804 958 












30000 

472 

J722 

952| 














40 0 00 

628 

962f 















50000 

784 
















60000 

942 
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SYSTEM SIZE- 64K 

WORK FILE SECTOR SIZE* 128 


MASK LENGTH 


RECORDS 

4 

8 

12 

16 

20 

24 

28 

32 

36 

40 

44 

48 

so 

W A*. 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

500 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

750 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

1 0 0 0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

64 

64 

64 

126 

150 0 

0 

0 

0 

0 

0 

0 

0 

64 

64 

95 

95 

95 

95 

95 

95 

189 i 

20 0 0 

0 

0 

0 

0 

0 

64 

64 

85 

85 

126 

127 

127 252 

liiii 

252 

~w 

250 0 

0 

0 

0 

54 

6 4 

80 

80 

106 

106 

316 

316 

316 

316 

316 

316 

0 

30 0 0 

0 

0 

48 

64 , 

77 

95 

95 

1254 

254 

378 

378 

378 

378 

378 

378 

■'■ 0 

350 0 

0 

45 

56 

74 

89 

2 2 2 

2 2 2 

[ 294 

294 

440 

440 

440 

440 

440 

440 

0 4 

50 0 0 

■41 

64 

80 

212 | 

254 

3*16 

316 

420 

42 Of 








750 0 

! 60 

190 

238 1 

316 

378 

472 

472 | 









10 0 0 0 

[160 

254 

3T6 

,.*2pr 













150 0 0 

[238 

378 

472 

i 













20000 

316 
















30 000 

!£72 

















SYSTEM SIZE- 64K 

WORK FILE SECTOR SIZE* 256 


MASK LENGTH 


RECORDS 4 

8 

12 

16 

20 

24 

28 

W A.. 

36 

40 

44 

48 

52 

56 

60 

64 

250 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

500 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 


0 

0 

0 

750 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

1000 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

64 

64 

64 

35 

150 0 

0 

0 

0 

0 

0 

0 

0 

55 

64 

77 

77 

95 

95 

95 

95 

127 2 

2000 

0 

0 

0 

0 

0 

5? 

64 

73 

85 

102 

102 

127 

2£4 


2521336 

250 0 

0 

0 

0 

54 

64 

71 

80 

91 

106 

254 

2541316 

316 

316 

316 

420 

30 0 0 

0 

0 

48 

64 

77 

85 

95 

218 

254 304 304 

378 

378 

380 

378 

504.6 

350 0 

0 

43 

56 

74 

89 

198 

662 

2541296 

354 

354 

440 

442 

442 

440 f 


50 0 0 

41 

61 

80 

2 j 2 

254 282 

316 

360 

420 

504 

5041628 630 

~63T 

628 

838 7 

750 0 

60 

182 

2381 

‘316 

378 

420 

472 

540f 630 

754 

754 

942 

942 

941+ 

940 1 


1 0 0 0 0 

16 0 

2421316 

420 

504 

j 560 

628 

718 

84 0f 








15000 

238 

J 362 

472 |628 

754 

838 

942f 










20 000 

316 

482 

J628 83 &f 













30 0 00 

472 

J720 

940 1 














4 0 0 0 0 

628 

960 1 















50000 

784 
















6 0 0 0 0 

[94 0 
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SYSTEM SIZE™ 64K 

WORK FILE SECTOR SIZE= 5.12 


MASK LENGTH 


250 
500 
750 
1000 
150 0 
2000 
250 0 
3000 
3500 


10000 160 
15000 230 
20000 316 
30000 472 
40000 Ull 
50000 7B4 
60000 940 


4 

8 

12 

16 

20 

24 

28 

*7 

V A.. 

36 

40 

“IT 

— ir 

—r 

—r 

-(T 

d 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

5 5 

64 

70 

0 

0 

0 

0 

0 

57 

64 

73 

85 

92 

0 

0 

0 

W A.. 

61 

71 

80 

91 

106 

230 

0 

0 

49 

62 

73 

85 

95 

218 

254 

276 ] 

0 

43 

56 

72 

85 

198 


254 

296[ 

322 

41 

61 

80 

204 

242 

lOOj 

■ii t 

mw 

■W 

458 

60 

182 

238' 

[306“ 

362 

422 

472 

542 

632 

686 


95 109 
252 290 3 
316 362 
378 434 
440 506 e 
628 722 ' 
9401080 a 


242f 318 406 480 5621 628 722 842 9121010 
[362 474 1608 720 042 942108 0 
4821 632 810 958] 

[720 946 P 
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Appendix B. Glossary 


address out: A type of sort in which the relative record 
numbers of the sorted records are provided as output. 

basic exchange: A diskette exchange format that uses 
128-byte sectors. 

blocked: A term used to indicate that one or more 
logical records are written in each sector (physical 
record). 

bytes: Eight bits used as a processing unit and a unit 
of measure for the 5110. 

complex file name: A file name made up of two or 
more simple file names with a period between names. 

Up to 17 characters, including the periods, are allowed 
in a complex file name. 

cylinder: The area of a diskette that can be accessed 
without moving the access mechanism. 

cylinder 0: The outermost cylinder on the diskette that 
is used to record information about the data on the 
diskette. 

data set: Another name for a file. 

data set label: A record that defines a file. The name, 
size, location, and organization of a file are defined in 
the data set label. 

ERMAP: A sector in cylinder 0 that is used to record 
the defective cylinders on the diskette. 

exchange: A diskette format or a data organization that 
allows for the exchange of data between different 
systems. 

extended label area: Additional area of a diskette that 
is used for data set labels. 

file: An organized collection of related records treated 
as a unit (data set). 

format: The size of the sectors and the number of 
sectors in a cylinder of a diskette. 

H-type exchange: A diskette exchange format that 
uses 256-byte sectors. 


IMF: IMFs (internal machine fixes) are supplied by IBM 
to correct machine problems. 

logical record: All the data that relates to a common 
identifier. 

physical record: The amount of data read at one time 
governed by the hardware device and media. 

relative record number: The number of the record 
within a file relative to the beginning of the file. 

sector: Part of a track on a diskette that contains one 
physical record. 

simple file name: A file name of up to 8 characters. 
The first character must be uppercase alphabetic (A-Z). 
Other characters may be alphameric (A-Z, 0-9). 

spanned: A logical record spans the sector (physical 
record) boundaries. 

track: Part of a cylinder on a diskette. 

unblocked: One logical record is written in each sector 
(physical record). 

unspanned: A logical record does not span the sector 
(physical record) boundaries. 
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Appendix C. Error Codes 


The error codes in this appendix are arranged in ascending number order. Each 
customer support function is assigned a group of numbers. The group of 
numbers assigned to each function are: 

Numbers Function 

000-249 See your language reference manual 
250-264 Tape data recovery 
265-274 Tape header recovery 
275-299 Diskette recovery 
300-349 Sort 

350-374 Tape-to-diskette and diskette-to-tape copy 

375-399 Tape-to-tape copy 

400-424 Diskette-to-diskette copy 

425-429 Compress 

430-449 Label display 

450-474 Initialization 

475-499 Loader 

500-999 See your language reference manual 

TAPE DATA RECOVERY 


Error 

Meaning 

User Response 

250 

An invalid file number was entered. 

Press the EXECUTE key 
to get the option to 
stop or specify another 
file. 

251 

Invalid file type for data recovery. 

Only file types 01, 02, 03, or 08 may 
be used. 

Press the EXECUTE key 
to get the option to 
stop or specify another 
file. 

252 

Invalid entry mode. 

Press the EXECUTE key 
to get the option menu. 

253 

Read error on a header label. 

Press the EXECUTE key 
to get the option menu. 
Then use the tape 
header recovery 
function to correct the 
header. 
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TAPE HEADER RECOVERY 


Error 

Meaning 

User Response 

265 

No header that caused a read error 
was found. 

Select another option. 

266 

The header causing the read error 
cannot be recovered. 

Select another option. 

267 

An incorrect length parameter was 
entered. 

Reenter the parameter, 
making sure the length 
is correct. The input 
line following the 
parameter must be 
blank. 

268 

The data that was entered is not valid 
for the field requested. 

Enter valid data. 

269 

Invalid entry was made for the 
selection of an option. 

Enter the correct option 
entry. 

270 

Invalid tape file number. 

Enter a correct tape file 
number. 

271 

R/W storage is not large enough to 
copy the file. 

Try the recovery 
function again without 
features or IMFs 
loaded. 

272 

A two-tape-drive copy was specified 
and the input and output drive 
numbers are the same. 

Specify different drive 
numbers for the input 
and output file. 

DISKETTE RECOVERY 


275 

Invalid entry was made for the 
selection of an option. 

Enter a correct option 
entry. 

276 

Invalid diskette drive number. 

Enter 1, 2, 3, or 4 to 
select the diskette 
drive. 

277 

Invalid diskette file number. 

Enter a correct file 
number. 

278 

No read errors were found in the 
volume label. 

Select another option. 

279 

Invalid entry for the label extension 
indicator. 

Enter a valid label 
extension indicator. 

280 

Invalid entry for the volume surface 
indicator. 

Enter a valid volume 
surface indicator. 



DISKETTE RECOVERY (continued) 


Error 

Meaning 

User Response 

281 

Invalid entry for the physical record 
length. 

Enter a valid physical 
record length. 

282 

Invalid entry for the physical record 
sequence. 

Enter a valid physical 
record sequence. 

283 

Volume label error. 

Retry recovery using 
option 1. 

284 

No read errors were found in the 
header you specified. 

Select another option. 

285 

Invalid entry for the header label. 

Make a valid header 
label entry. 

288 

Sector size is not supported. 

Use a different diskette 

that has a valid format. 

289 

Header label error. 

Retry recovery using 
option 2. 

290 

File specified for data recovery is not 
file type 2, 8, or 9, or the file 
specified contains no data. 

Data cannot be 

recovered for other than 
type 2, 8, or 9 files. 

291 

No read errors were found for the file 
you specified. 

Select another option. 

292 

The file type is 9, but sequential 
relocate is not permitted. 

Data recovery cannot 
be performed on this 

file. 

293 

Unable to recover data on this file. 
Data can be copied to another file on 
the same or different diskette. 

Continue with the 
function; specify the file 
number you want the 
data copied to. 

294 

R/W storage is not large enough to 
copy the file. 

Try the recovery 
function again without 
features or IMFs 

loaded. 

295 

The diskette selected to copy to has a 
different format than the input 
diskette. 

Use a diskette for 
output that has the 
same format as the 
input diskette. 

SORT ERROR CODES 


300 

Response to option was: 

- Not numeric 

- Not one of the valid responses 

Enter a valid option 
number. 

301 

Invalid name in a sort statement. 

Enter, starting in 


position 1, one of the 
valid names: FILE, 
SORT, MASK, ALTS, 
WORK, or STOP. 
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SORT ERROR CODES (continued) 


Error 

Meaning 

User Response 

302 

A space appeared in a sort statement 
parameter. 

Delete the space from 
the statement, or enter 

STOP to end the sort. 

303 

The sort-group-name in the FILE 
statement is too long. 

Shorten the name to 8 
characters, or enter 

STOP to end the sort. 

304 

The last parameter of a statement 
was not followed by blanks or the 
SORT statement contains an invalid 
SORT type. 

Make sure blanks 

follow the sort 

statement, or enter 

STOP to end the sort. 


The logical not character (-.) appears 
on the screen in a sort control 

statement. 

Use the following procedure 
and add the calculated number 
of comment statements to 
the control group: 

1. Subtract 123 from the 
input file record length. 

2. Divide the result from 

Step 1 by 64. 

3. Round the result from 

Step 2 up to the next 
whole number. 

305 

Alphameric characters were expected. 

The logical not character (->) appears 
on the screen in a sort control 

statement. 

Change the entry to 
alphameric characters, 
or enter STOP to end 

the sort. See 
three-step procedure 
under Error 304. 

306 

Alphabetic characters were expected. 

The logical not character (-U appears 
on the screen in a sort control 

statement. 

Change the entry to 
alphabetic characters, 
or enter STOP to end 

the sort. See 
three-step procedure 
under Error 304. 

307 

Numeric characters were expected. 

The logical not character (-0 appears 
on the screen in a sort control 

statement. 

Change the entry to 
numeric characters, or 
enter STOP to end the 
sort. See three-step 
procedure under Error 

304. 

308 

Missing comma between input file 
and output file parameters. 

Enter the comma, or 

enter STOP to end the 

sort. 

309 

File number contains more than four 
digits. 

Enter file number with 
four digits or less, or 
enter STOP to end the 

sort. 

310 

File name contains more than 17 

characters. 

Enter file name with 17 

characters or less, or 

enter STOP to end the 

sort. 
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SORT ERROR CODES (continued) 


Error 

Meaning 

User Response 

311 

Comma was entered in place of the 
diskette drive number. 

Enter the diskette drive 
number, or enter STOP 
to end the sort. 

312 

File number and name of the input or 
control file do not match. 

Enter the correct file 
number and name, or 
mount the correct 
diskette, or enter STOP 
to end the sort. 

313 

Input file and output file are the same 
file. 

Specify different files 
for input or output, or 
enter STOP to end the 

sort. 

314 

Work file is the same as the input file 
or output file. 

Specify a work file that 
is different from the 
input or output file, or 
enter STOP to end the 

sort. 

315 

Output file name contains more than 

8 characters or has more than 8 
characters between periods. 

Specify a valid name 
for the output file, or 
do not use an output 
file name, or enter 

STOP to end the sort. 

316 

Invalid use of periods in a complex 
output file name. 

Specify a valid name 
for the output file, or 
delete the output file 
name, or enter STOP to 
end the sort. 

317 

One of the names reserved for 
system use, SYSAREA or ERRORSET, 
was specified for the output file 

name. 

Change the output file 
name, or delete the 
output file name, or 
enter STOP to end the' 

sort. 

318 

ALTS statement contains an invalid 

character. 

The logical not character (-.) appears 
on the screen in a sort control 

statement. 

Enter only hexadecimal 
characters (0-9, A-F), 
or enter STOP to end 
the sort. See 
three-step procedure 
under Error 304. 

319 

Invalid number of characters between 
commas in the ALTS statement. 

Enter 4 hexadecimal 
characters between 
commas, or enter STOP 
to end the sort. 

320 

R/W storage is not large enough to 
contain a control file physical record, 
or an ** statement (sort group name) 
was not found. 

Specify another file or 
enter STOP to end the 

sort. 
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SORT ERROR CODES (continued) 


Error 

Meaning 

User Response 

321 

Control group was not found. 

Specify a correct name 
or file, or enter STOP 
to end the sort. 

322 

Too many records were encountered 
in a control group before the specified 
group was found. 

Specify another group 
name or enter STOP. 

323 

Logical record length of control file 
not 64. 

Specify another file or 
enter STOP. 

324 

Control file is not a record I/O file 
with blocked-spanned records. 

Specify another file or 
enter STOP. 

325 

Too many records in input file or the 
5110 user storage is not large enough 
to do the sort. 

Respond to the options. 

326 

R/W storage is not large enough to 
do the sort. 

Respond to the options. 

327 

R/W storage is not large enough to 
contain the control group that was 
found. 

Specify another group 
or enter STOP. 

328 

Invalid length field for BASIC internal 
numeric short or long data type. 

Enter 4 for short 
precision, or 8 for long 
precision, or enter 

STOP to end the sort. 

329 

Mask location is not within logical 
record length. 

Correct the position or 
length of the mask 
field, or enter STOP to 

end the sort. 

330 

Mask position or length entry contains 
too many digits. 

Correct mask position 
(maximum of four 
digits) or length 
(maximum of two 
digits) entry, or enter 
STOP to end the sort. 

331 

No mask position or length entry. 

Specify a mask position 
and length entry, or 
enter STOP to end the 

sort. 

332 

Mask position or length entry must be 
greater than zero. 

Correct the error, or 
enter STOP to end the 

sort. 

333 

Mask type is not A, D, F, G, N, or 0. 

Correct the error or 
enter STOP to end the 

sort. 

334 

Total MASK length is greater than 64. 

Reduce the total MASK 
length, or enter STOP 
to end the sort. 



SORT ERROR CODES (continued) 


Error 

Meaning 

User Response 

335 

The block length of an 
unblocked-unspanned file is greater 
than the sector size. 

Specify a different file, 
or enter STOP to end 

the sort. 

336 

The block length for a 
blocked-spanned file does not equal 
the sector size. 

Specify a different file, 
or enter STOP to end 

the sort. 

337 

A work file is needed. 

Enter a WORK 

statement, or enter 

STOP to end the sort. 

338 

Work file too small. 

Enter option. Return to 
the calling language to 
increase size of work 
file, or enter STOP to 
end the sort. 

339 

Name of the output file already exists 
on the diskette. 

Change name of output 
file, or change diskette, 
or enter STOP to end 

the sort. 

340 

Output file too small. 

If detected when the 

SORT statement was 
entered, specify another 
output file, or enter 
STOP to end the sort, 
if detected during the 
sort, the sort completed 
display appears; 
respond to the options. 

341 

Output file or work file is a used file. 

Specify unused files, or 
enter STOP to end the 

sort. 

342 

Multivolume file was specified but 
cannot be used by the sort program. 

Specify a different input 
file, or enter STOP to 
end the sort. 

343 

The referenced file application type 
not supported. 

Specify a different file, 
or enter STOP to end 

the sort. 

344 

The referenced file exchange type not 
supported. 

Specify a different file, 
or enter STOP to end 

the sort. 

345 

Variable-length logical records were 
specified but cannot be used by the 
sort program. 

Specify a different file, 
or enter STOP to end 

the sort. 
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SORT ERROR COOES (continued) 


Error 

Meaning 

User Response 

346 

The input file must be a 
blocked-spanned or 
unblocked-unspanned file, or the 
control file must be a 
blocked-spanned file. 

Specify a different file, 
or enter STOP to end 
the sort. 

347 

Input file does not contain any 
records. 

Specify a different input 
file, or enter STOP to 
end the sort. 

349 

The sector size of the control, input, 
output, or work file is not supported. 

Specify a file with a 
sector size of 128, 256, 
or 512 bytes. 

TAPE-TO-DISKETTE AND DISKETTE-TO-TAPE ERROR CODES 

350 

Response to option was: 

- Not numeric 

- Not one of the valid responses 

Enter correct response. 

351 

Invalid file number was entered. 

Enter the file number, 
up to four digits. 

352 

Tape file name is invalid and will not 
be copied to the diskette file. 

Enter a valid file name. 

This name will be used 

as the file name for the 
copied diskette file. 

(See Chapter 1). 

353 

File name that was entered is invalid. 

Enter a valid file name. 
(See Chapter 1). 

354 

Diskette file is write-protected. 

Restart the function and 
specify a 

non-write-protected 
diskette file for output. 

355 

Diskette file expiration date is not 
blank. 

Restart the function and 
specify an unused 
diskette file for output. 

356 

File name of the tape file or the file 
name entered from the keyboard 
already exists on the diskette file (see 
Chapter 1). 

Enter a valid file name 
that does not already 
exist on the diskette 

file. 

357 

Tape file to be copied from is unused. 
An unused file cannot be copied. 

Make sure you have not 
specified an unused file. 
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TAPE-TO-DISKETTE AND DISKETTE-TO-TAPE ERROR CODES 
(continued) 


Error 

Meaning 

User Response 

358 

Tape file to be copied from is type 4 
or 5. These file types cannot be 
copied. 

Make sure you have not 
specified a type 4 or 5 
file. 

359 

Tape file to be copied from is type 6 
or 26. These file types cannot be 
copied. 

Make sure you have not 
specified a type 6 or 26 
file. 

361 

Tape file to be copied from is type 

16, 17, 18, or 19. These file types 
cannot be copied. 

Make sure you have not 
specified a type 16, 17, 
18, or 19 file. 

362 

Tape file has an invalid file type. 

Make sure the tape file 
has a valid file type. 

363 

Diskette file has an invalid file type. 

Make sure the diskette 
file has a valid file type. 

364 

Diskette file to be copied from is type 
26. These file types cannot be 
copied. 

Make sure you have not 
specified a file type 26 
file. 

365 

Diskette file to be copied from is type 
10. A type 10 file cannot be copied. 

Make sure you have not 
specified a file type 10 
file. 

366 

Diskette file to be copied from is 
unused (EOD « BOE). An unused file 
cannot be copied. 

Make sure you have not 
specified an unused file. 

367 

Diskette sector size is 1024 bytes. 

This size is not supported. 

Use a different diskette 

that has a valid format. 

368 

The header label on the diskette is 

not correct. 

Use diskette recovery 
function to create a 

valid header. 

369 

The logical record length in the tape 
header is zero. 

Use diskette recovery 
function to create a 

valid header. 

370 

Diskette file to be copied from is type 
15. This file type cannot be copied. 

Make sure you have not 
specified a type 15 file. 

TAPE-TO-TAPE ERROR CODES 


375 

Invalid entry was made to select an 
option. 

Reenter the option 
entry. 

376 

Invalid file number was entered. 

Reenter file number. 

377 

Invalid tape drive number was 
entered. 

Reenter tape drive 
number. 

378 

Input file contains no data (file type 
00). 

Reenter input file 
number. 

379 

Output tape file is not marked. 

Mark the output file 


and restart the copy 
operation. 



DISKETTE TO-DISKETTE ERROR CODES 


Error 

Meaning 

User Response 

400 

Invalid response to an option. 

Enter the correct 

response. 

401 

Invalid file number was entered. 

Reenter the file number, 
up to four digits. 

402 

Invalid diskette drive number was 
entered. 

Reenter correct diskette 
drive number: 1, 2, 3, 
or 4. 

403 

The output diskette has a different 
sector size, a smaller format number 
(less capacity), or fewer cylinders set 
aside for the extended label area than 
the input diskette. When the label 
area causes the error, the number of 
cylinders for each diskette is 
displayed. 

Use an output diskette 
that has the same 
sector side, the same or 
larger format number, 
and the same or larger 
label area than the 
input diskette. 

404 

Input diskette sector size is not equal 
to that of the output diskette. 

Make sure both 
diskettes have the same 

sector size. 

405 

Output file is not marked. 

Mark the output file or 
use a different file. 

406 

Input diskette sector size is 1024 
bytes. This size is not supported. 

Use a different diskette 
that has a valid format. 

407 

Output diskette sector size is 1024 
bytes. This size is not supported. 

Use a different diskette 

that has a valid format. 

408 

Input diskette file contains no data. 

Reenter the input file 
number. 

409 

Invalid file name was entered. 

Enter a valid file name 
(see Chapter 1). 

410 

The output file has the file-protect 
indicator on. 

Use a file that is not 
file-protected for 
output. 

411 

The expiration date on the output file 
is not blank. 

Use a different file with 
a blank expiration date 
for output. 

412 

No files exist on the input diskette. 

Use a diskette that 
contains files. 

413 

The diskette cover was not opened. 

Press the EXECUTE key 
if the input files are on 
the same diskette, or 
insert the correct 
diskette. 
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DISKETTE-TO-DISKETTE ERROR CODES (continued) 

Error Meaning User Response 


414 


415 


416 


During image copy on a one drive Restart image copy or 
system, the original diskette was not return to system, 
used when prompting for the from 
diskette. 


During image copy, the output 
diskette has different sector size, 
diskette type, or extended labels than 
the input diskette. 


Initialize the output 
diskette to the same 
attributes as the input 
diskette. 


During image copy, the response 
indicated two diskette drives were to 
be used and the same drive number 
was used for the from and the to 
drive. 


If two drives are to be 
used, a different 
number must be 
specified for the from 
and the to drives. 
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COMPRESS ERROR CODES 


Error 

Meaning 

User Response 

425 

Invalid entry was made to select an 
option. 

Reenter the option 
entry. 

426 

Input diskette sector size is 1024 
bytes. This size is not supported. 

Use a different diskette 
that has a valid format. 

LABEL DISPLAY 


430 

Invalid selection of options or the 
input line is not correct format. 

Reenter, starting in 
position 1, the options 
given in the prompting 
message. 

431 

A file number of zero was specified 
or the first file number of a range 
was greater than the second. 

Enter a valid file 
number or range. 

432 

A file number larger than what can 
exist on the media was specified. 

Select another option. 

433 

The volume is access-protected. 

Labels cannot be displayed when 
volume is access-protected. 

Select another option. 

434 

Diskette drive door was opened 
before last file header was read. 

Select another option. 

436 

The end of the marked tape was 
found. 

Respond to the 
message by selecting 
an option. 

437 

The tape is not marked for the tape 
header that was specified. 

Respond to the 
message by selecting 
an option. 

INITIALIZATION ERROR CODES 


450 

IN IT is not in correct position. 

Make sure 1NIT is in 
positions 1 to 4 of the 
initialization command. 

452 

Characters used for volume 
identification are not alphameric. 

Make sure all 

characters are 
alphameric. 

453 

VOL-ID field of initialization command 
contains more than 6 characters. 

Make sure not more 

than 6 characters are 
entered for the volume 
identification field. 


Error Codes 
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INITIALIZATION ERROR CODES (continued) 


Error 

Meaning 

User Response 

454 

Characters used for owner 
identification are not alphameric. 

Make sure all! 
characters are 
alphameric. 

455 

OWNER-ID field of initialization 
command contains more than 14 
characters. 

Make sure not more 
than 14 characters are 
entered for the owner 

identification field. 

457 

Invalid format specified. 

The valid entries are the 
digits 1 through 9. 

458 

Sector sequence number is not a 
two-digit number. 

Enter sector sequence 
number as a two-digit 
number. 

459 

Invalid number specified for sector 
sequence. 

Enter correct number; 
see chart in Diskette 

Format for valid entries. 

460 

Invalid entry made for increasing the 
number of labels on format 7, 8, or 9 
diskettes. 

Valid entries are blank 
and digits 1 through 9. 
The digits must be 
entered in position 1 
with position 2 blank. 
Reenter. 

461 

Diskette drive number was not found 
in position 1. 

Enter diskette drive 
number in position 1; 
valid entries are 1, 2, 3, 
or 4. 

462 

A nonnumeric character was found 
for the diskette drive number in 
position 1. 

Enter 1, 2, 3, or 4 to 
select the diskette drive 
in position 1. 

464 

Response to option was: 

- Not in position 1 

- Not numeric 

- Not one of the valid responses 

Retry. If error occurs 
again, diskette could be 
defective. 

465 

More than two bad cylinders found 
during initialization. 

Retry. If error occurs 
again, diskette could be 
defective. 

466 

A comma was not found where one 
was expected in the initialization 
command. 

Make sure all commas 
are present; a comma 
must separate each 
parameter. 

467 

The position after the two-digit sector 
sequence number is not blank. 

Make sure a blank 
follows the sector 
sequence number. 



INITIALIZATION ERROR CODES (continued) 


Error 

Meaning 

User Response 

468 

A secure data set was found. 

Respond to the 
message by selecting 
an option. 

469 

A write-protected data set was 
found. 

Respond to the 
message by selecting 
an option. 

470 

A used data set (EOD is greater than 
BOE) was found. 

Respond to the 
message by selecting 
an option. 

471 

A data set with a nonblank expiration 
field was found. 

Respond to the 
message by selecting 
an option. 

472 

A Diskette 1 type diskette is in the 
drive, and a format of 4 through 9 
was specified. 

Format 1, 2, or 3 must 
be specified for 

Diskette 1 type 
diskettes. 

473 

A Diskette 2 type diskette is in the 
drive, and a format of 1, 2, or 3 was 
specified. 

Formats 4 through 9 
must be specified for 
Diskette 2 type 
diskettes. 

474 

Cylinder zero is defective. Cylinder 0 
must be defect free. 

Retry; if error occurs 
again, diskette could be 
defective. 

LOADER ERROR CODE 


475 

Invalid number entered for an option. 

Enter a valid number. 

476 

The file to be loaded from is not a 
type 22 file. 

Feature programs must 
be on a type 22 file. 
Press the EXECUTE key 
to get the option to 
stop or continue. 

477 

The program you are trying to load 
does not have a valid feature code. 

Press the EXECUTE key 
to get the option to 
stop or continue. 

478 

You are trying to load a feature 
program that is already loaded. 

Press the EXECUTE key 
to get the option to 
stop or continue. 

479 

Not enough space remains in the 
work area to load the feature 
program. 

Press the EXECUTE key 
to get the option to 
stop or continue. 

480 

You are trying to load the translated 
sort messages, and they are already 
loaded. 

Press the EXECUTE key 
to get the option to 
stop or continue. 


Error Codes 
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LOADER ERROR CODE (continued) 


Error 

Meaning 

User Response 

481 

An invalid or incorrect hexadecimal 
character was entered. 

Correct and reenter the 
character. 

482 

There is no IMF for the problem 
number you entered. 

Enter a different 
problem number. 

483 

The IMF is not for your system. 

Enter a different 
problem number. 

484 

The IMF problem number you entered 
already exists. 

Enter a different 
problem number for 
your IMF. 

485 

There is no preformatted record in the 
IMF file for your key-entered IMF. 

You cannot enter the 
IMF. Get a different 

IMF file from IBM. 

486 

An invalid or incorrect file number 

was entered. 

Enter the file number, 
up to four digits. 

487 

Blank in the file name. 

Enter a valid file name 
(see Chapter 1). 

488 

Too many characters entered for a 
response to a prompt. 

Enter the correct 

number of characters 
for the response to the 
prompt. 
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